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For Owners And Users Of Commodore VIC-20" And 64" Personal Computers 


CALENDAR ROBOTS: The New 
MAING Mobile Computers 


Robots on the mar- 


м, >= ket and in the home. | 
| Ап іпѕіае look at Á : 
Make any of four what they do, what p" 
impressive calendars they cost, and what М í 
with your VIC ог64 and to look for in the qp VUA 
printer. years ahead. ] Ё 


Power BASIC: = : 
Numeric Keypad NE VETS S а” ED 
Turn your VIC oróá An exciting ы... 
keyboard into ап action-strategy 


end t E. game for the Also In This Issue 


short machine lan- pus and 64. How To Start A 


guage program. User Group 
French Tutor 
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Little Known BASIC 
Commands 


ПГ ШИШШШШШПШИШПЕ 


Adding А Second 
Joystick То Тһе МІС 
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The Most Powerful 549.95 Cartridge Word Processor 
. forthe Commodore 64™ 


WALLS Nowe 


The WRITE NOW! Word Processor 
provides you with the easiest to use 
& fastest to learn format available 
for your C-64. It gives you the 
features you expect in a 
professional word processor & 
some unique features not 
available in any other C-64 word 
processor. 


With WRITE NOW! you have 
unlimited recall of often used text; 
global string search makes it easy 
to find or replace any copy. 
Editing copy is made easy with 
simple commands and the full 
block command enables you to 
move or delete blocks of copy. You 
can insert or delete text at will as 
you scroll up or down through your 
document line by line, page by 
page, or you can jump directly to 
the beginning orthe end of your 
document. WRITE NOW! gives you 
the option oftext centering & 
justification, along with the use of 
multiple line headers & footers. 
Page numbering can be set at the 
top or bottom of a page and 


either in Arabic or Roman numbers. 


Other features of WRITE NOW! 
include: 


е INTERFACES with: 
MAIL NOW! Professional mailing list 
processor for the C-64. 
SPELL NOW! 30,000 word dictionary. 
GRAPH NOW! Full featured graphics 
and chart processor. 

* program оп cartridge (time not 
wasted loading from disk or 
tape). 


343 Mathewson • Wichita, Kansas 67244 е (316) 267-6525. 


C-64isaregistered trademark of Commodore Intemational 


е save textto tape or disk. 
e sends any ‘special’ codes to the 


printer — even in the middle of 
text (special codes are 
'user-definable") . 


е optional joystick control for 


scrolling. 


Included with WRITE NOW! is a 100- 
plus page easy-to-understand 
instruction booklet — all for the 
Manufacturer's Suggested Retail 
Price of $49.95. 


See а complete line of American 
made Cardco Products at a 
computer store near you, today. 


s Suma 


баоге 


е Сотт 


as you need it. 


or interest, with Superbase 64 
fast 


No matter what your business 
you have a totally flexible 
‘record’ system, as big as you 


want it, as 


The World Famous Commodore 64. 


Create your own 
formats, enter your records, 
Superbase gives you 
unrivalled control in home or 
business or 
professional practice, with 
a range of features 


change layouts and datafields. 
including: 
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Precision 


“Make note of that name, Electronic Arts. 
Itmay well setthe standard for sophisticated 


25) 


entertainment software in the 80s: 


— Creative Computing. 


ELECTRONIC ARIS 
COMES IO 
THE COMMODORE. 


ARCHON" by Free Fall Associates 


“No review could possibly do "...the offices of A.N.A.L.O.G. 
more than hintat the manifold echo with the searing roar of 
excellence of Archon. It is dragon-fire and shouted 

% truly a landmark in the devel- obscenities from angry players. 
opment of computerized Archon turns friend against 
strategy games.” — Video friend and inspires grudges that 
"... you're bound to fall for it. can last for days. What better 

= Imagineachessgamein which compliment can you give to a 
you can cast spells” computer program. 

— Creative Computing -АМАТОС. 

% MOST INNOVATIVE GAME OF THE YEAR 


— Electronic Games 
TOP 10 GAMES OF 
THE YEAR 

- OMNI 


COMPUTER GAME OF < 
THE YEAR 
— Creative Computing 


HARDHAT MACK" 
by Michael Abbot and 
Matthew Alexander 

"An outstanding, state-of-the- 
art game. Hard Hat Mack is the 
blue collar hero of this three 
screen climbing game and his 
tasks are far from simple?" 

— Arcade Express 

"If you put Hard Hat Mack 
in the ring with all other 
games on the market, it 
would win most bouts in 


C64, Ap, At 


the opening seconds of the 
first round. Its that good.” 
—Softalk 
C64, Ap, At 
Ap, C64, At, signify availability for Apple II, II+, ПЕ, Commodore 64, or Atari home computers with disc drive. All screen shots represent Commodore 64. Apple is a registered 


trademark of Apple Computer, Inc. Commodore 64 is a registered trademark of Commodore Business Machines, Inc. Atari is a registered trademark of Atari, Inc., a Warner Communications Company. 


MURDER ON THE 
ZINDERNEUF" 
by Free Fall Associates 
"Whodunit fans, drop your 
Agatha Christie and come 
running.Thisisyourgame! The 
graphics are among the most 
ы ж» colorful and attractive I һауе 
M.U.L.E. seen in any вате’ — Antic 
by Ozark Softscape 
“A must-have.” 
—Electronic Fun 
“Мау well become the Monopoly 
of computer games” 
— Personal Software 
"Graphics, sound and humor. 
are superlative” 

— Creative Computing 
“Recommendation? Buy it” 
—Softline 
BEST MULTI-PLAYER 
GAME OF THE 
YEAR 
—Electronic Games 


WY C64, At 


52 
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CONSTRUCTION SET" 
by Bill Budge 
"The best program ever written 
for an 8-bit machine” 
—Steve Wozniak 
"A fully integrated 
graphics-oriented 
design tool that lets 
you create your own 
video pinball games, 
required study for all serious 
software authors” 
—A.N.A.L.O.G. 
"A tour de force” 
— Creative Computing : 2 
MOST ORIGINAL GAME ОЕ THE YEAR D C64, Ap, At 
— Creative Computing 
TOP 10 GAMES OF THE YEAR 
— Omni 


ELECTRONIC ARTS 


Home Software for the Commodore 64 


Look for our other Commodore 64 titles like AXIS ASSASSIN™ WORMS?" and THE TESSERACT STRATEGY “ағ your favorite computer store, software center and at fine department stores throughout the country. 
For more information about these and other Electronic Arts products, write or call us ас 2755 Campus Drive, San Mateo, CA 94403 — (415) 571-7171 


. BRUTAL! RUTHLESS! UNPREDICTABLE! 


ea, 


Е 


ІМ THIS GAME Okay, boss, now what do we do? Research & Development is work- 
Ww ing round the clock coming up with new products, the warehouse 


YOU RE ALLY GET is overflowing, the advertising agency wants more money, your 


customers are fickle, and the competition just slashed their prices. 


THE BUSINESS е Were all waiting for your decision. 


Put yourself at the helm of this enterprising new software company. 
Every major decision is in your hands. Use your logic and intuition to 
spot market trends. Keep a close eye in your balance sheet. Get a 
grip on your company, a leg up on your competition, and a strangle- 
hold on the market. Do you have what it takes to be King of Silicon 
Valley? Or will you end up selling apples on skid row? 


Intense strategic challenge combined with a real education in the 
workings of big business make In The Chips one game anyone can 
profit from. 


IN THE CHIPS." Concept Education for the VIC-20, 
Commodore 64, IBM PC and PCjr. 


"VIC-20" AND "COMMODORE 64" ARE TRADEMARKS OF COMMODORE ELECTRONICS, LTD. “ІВМ РС” AND "PCjr" ARE TRADEMARKS OF INTERNATIONAL BUSINESS MACHINES, INC. © 1984 CREATIVE SOFTWARE. 
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Ihad originally planned to write 
about Jack Tramiel's recent res- 
ignation from Commodore. He 
was its president, chief execu- 
tive officer, and, not least, its 
founder. After starting the com- 
pany 25 years ago, he has been a 
critical force in shaping this 
entire industry. Recent events, 
however, dictated that I pull 
that editorial and replace it with 
this one. 

We all have visions of this 
industry of ours and where it's 
going. One of mine has always 
been to disseminate all types of 
interesting, useful software 
through a magazine. We've done 
that, done it well. And we've 
grown rapidly in the few years 
since this industry began and 
our company began—with your 
continued readership, support, 
and contributions of feedback, 
programs, articles, etc. 

For a long time we've been 
looking ahead, asking how we 
can help. That's a collective we. 
How can we move to a new 
plateau? Knowing that we 
wanted to be able to move further 
in our goal of efficient dissemi- - 
nation of software, we started 
the first of what I hope will be- 
come several disk magazines. 
We chose the GAZETTE to start 
with because it was the easiest 
to transfer onto the new medium. 
The logistics are, nevertheless, 
incredible. 

The final decision was to 
price-our disk version of the 
magazine at a “mass-market” 
price, not at an incredible mark- 
up. Those of you who have been 
readers of our publications for 
some time are well aware that 
hundreds of dollars worth of 
software is found within the 
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pages of our magazines. Some- 
times in a single issue. Our deci- 
sion was to carry this thinking, 
this philosophy, and these goals 
forward into the new disk 
magazine. 

The response has been ex- 
cellent, with one exception. Be- 
ginning several weeks ago, and 
with increasing frequency, we're 
getting calls from individuals 
and user groups inquiring if the 
disk will be copy protected. 

Our thinking was that we 
could price the disk magazine 
(for the first time in the industry) 
ata price only slightly higher 
than a blank disk costs in many 
retail stores. We expected to be 
able to do this without adding 
protection. We wouldn't need to 
build in a giant profit margin to 
cover theft, we decided; we'd 
simply make the pricing very 
reasonable. We're wondering if 
that thinking is correct. 

Many of our authors spend 
dozens, sometimes hundreds, of 
hours developing the programs 
that we print in this magazine 
each month. In return, they're 
paid for their work. They'll earn 
additional royalties on diskette 
subscriptions—except for disk- 
ettes that are shared among doz- 
ens of users. Our in-house staff 
spends a comparable amount of 
time rewriting, testing, and 
translating programs to work on 
various computers. And they're 
paid for their work as well. We 
truly do not understand the 
mentality which advocates a 
"sharing" that, in effect, reduces 
the wages of these authors. 

I assume that most of us 
would resent this sort of theft if 
it happened to us personally. 
Few of us would take the result of 


our efforts, something we pro- 
duced for wages, and give it to a 
user group or a group of friends, 
saying, “This is a portion of my 
livelihood. Use itfreely, knowing 
that every time you share it you 
are reducing my salary by an 
equivalent percentage." 

If our expectations were off 
the mark, we should be charging 
$25 for each disk instead of less 
than $6. 

I would welcome some feed- 
back on this. Please address your 
comments, thoughts, or argu- 
ments to me, Personal and Con- 
fidential, at the address below. 
I'll read them all and respond to 
them in a future issue. Please 
indicate whether your letter (or 
parts of it) may be printed in the 
magazine. 

It's not my intention to 
create a stir, but I think that as a 
group of intelligent, active, in- 
terested users we should start a 
discussion on this. Unfortu- 
nately, we're probably going to 
have to protect the disks for now. 
And the reason for this editorial, 
the reason for my chagrin, is 
that we're fundamentally op- 
posed to such protection. We 
had decided we would be able to 
approach it all differently. 

I'm looking forward to 
hearing from you. 


Wat diee 


Editor In Chief 


Post Office Box 5406 
Greensboro, NC 27403 


Handie your home 
budget, stock portfolio, 
loans and mortgages 
with Calc Result 


Calc Result Easy is a simple-to-use spread- 
sheet program for the Commodore 64. It 
includes 254 lines x 64 columns, built-in 
graphics, and flexible printout formats. 
Plug-in cartridge... just plug it in and its 
ready. Perfect for cash flow analysis, perso- 
nal net worth, IRA analysis, travel expenses, 
credit card expenditures, gas and elec- 
tricity bills, etc. 


Calc Result Easy $49.95 


Calc Result Advanced gives you 32 pages of 
interrelated information. The three-dimen- 
sional feature allows you to consolidate 
calculations in summary format. Calc Re- 
sult Advanced comes on plug-in cartridge 
and disk. Disk drive required. 


A complete database 
for the home 


Addresses, telephone numbers, appoint- 
ments, birthdays, or records-whatever you 
want to remember-put it on DIARY, an 
electronic notebook for home use. DIARY 
comes on a plug-in cartridge. Its easy to 
use and easy to learn, giving you the 
flexibility to design a personal calendar 

or address book. 


{PS ey 
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1 
Diary $29.95 
Turn statistical 
imformatiom into 
graphic format 


GRAF 64 converts mathematical functions 
into graphical analysis on the Commodore 
64. Ап ideal program for studying math. 
Define a function, set the limits of an axis, 
plot a graph and display the extreme 
points, intersection values, etc. 


Graf 64 $29.95 


Handic — À Complete Line 
of Products to Keep Your 
Commodore 64 Busy 


—Everyday! 


Develop your bridge 
skills 


Whether you're an experienced bridge 
player or a beginner, polish your skills or 
learn the game with BRIDGE 64. Play 
North-South, then switch to East-West in 
the same deal, the return to that deal again 
and test your skill with a different strategy. 


Bridge $39.95 
Handic—for the 
broadest range of 
Commodore products 


As the largest independent developer of 
Commodore software and accessories, 
Handic’s broad range of business, educa- 
tion and recreation products are designed 
exclusively for the Commodore user who 
demands quality and reliability. 


Software & Hardware 
о 


іе5 ters 
Басат gore Comp": 
for 


The Catalogue 


ic 
папах m 


For more information and a catalogue of 
our products, see your nearest Commo- 
dore dealer, or call us direct. 


Handic Software, Inc. 
Fellowship Business Center 
520 Fellowship Road, B 206 
Mount Laurel, NJ 08054 
Phone (609)663-0660 


Commodore 64 is a registered trademark of Commodore 
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WordPro 3 Plus /64 


Тһе #1 Selling Word Processor for the Commodore 647" 


Mec Vm 4 
WordPro 3 Plus™/64 and SpellRight Plus™ provide а total word 
processing solution for the Commodore 64" which gives you: 


Sophisticated Word Processing 

Built-in Mail Merging for Form Letters 

Math Functions for Column Totals 

Fast and Complete Spell Checking via SpellRight Plus 
A Super Value (two programs) for 0nly $99.95! 


WordPro and SpellRight are both specifically designed for the 
novice user with no computer or word processing experience 
whatsoever. And with over 40,000 WordPro versions sold, you 
can be sure that WordPro is a very sophisticated word 
processor loaded with powerful features including: Transfer, 
Insert, Delete, and Rearrange Text, Auto Page Numbering, Math 
Functions, Headers, Footers, Global Search and Replace, the 
Ability to Create Multiple Personalized Letters and Documents, 
and much more. WordPro can create documents of virtually 
any length and will print up to 165 columns wide. You get all of 
this ИШЕ fast and complete spell checking using SpellRight 
Plus! 


+ + + * * 


WordPro 3 Plus™/64 and SpellRight Plus™ are trademarks of Professional Software Inc. 


SpellRight Plus locates and highlights misspelled words and 
then allows you to quickly correct the misspellings — 
improving the quality of your letters and reports. 

And, best of all, WordPro and SpellRight’s powerful arsenal 
of features can be put to use almost immediately — by even 
the novice user. So whether you're a student, professional 
writer, in business, education or a hobbyist, you'll quickly 
become a WordPro Pro! 


Both WordPro and SpellRight Plus are also available separately 
at popular computer outlets nationwide. 


Invest in the best . . .WordPro Plus. In a class by itself. 


Professional Software Inc. 


51 Fremont Street (617) 444-5224 
Needham, MA 02194 Telex: 951579 


Dealer and Distributor inquiries are invited. 


The WordPro Plus Series was designed and written by Steve Punter of Pro-Micro Software Ltd. 
SpellRight Plus was designed and written by Dwight Huff and Joe Spatafora of SpellMaster Systems, Inc. 
Some printers may not support certain WordPro 3 Plus functions and/or require an interface. Please check with your dealer. 


Commodore 64™ is a trademark of Commodore Electronics Ltd. 


Ex 


EDITORS AND READERS 


Do you have a question or a problem? Have 
you discovered something that could help other 
VIC-20 and Commodore 64 users? Do you have 
a comment about something you've read in 
COMPUTE!s GAZETTE? We want to hear from you. 
Write to Gazette Feedback, COMPUTE's GAZETTE, 
P.O. Box 5406, Greensboro, NC 27403. 


The Datassette Mystery Ground 
Wire 


I own a Commodore 64 and recently encountered 
a problem that I thought should be passed on to 
you. 

The ground braid wire (the silver-colored 
bare wire) attached to the Commodore Datassette 
plug accidentally came in contact with a metal tab 
in the user I/O port and permanently damaged a 

` few chips in the computer. I had to take the 64 to 
a service center to be repaired. Even though the 
computer was only five weeks old, the damage 
was not covered by the warranty. I had to pay for 
the repairs myself. 

In the instruction manual supplied with the 
Datassette, there is no mention made of either the 
uses for this wire or the aforementioned dangers. 

What is this ground wire to be used for, and 
is it needed? 


Frank Harris 


A Commodore representative informed us that the 
ground braid wire is not needed on the Commodore 64 
or the VIC-20, nor is there any place to attach it. If the 
wire touches the metal tabs in the I/O port, it can indeed 
do damage. 

The easiest way to prevent this is to wind the 
braided wire around the cassette's cord and then tape it 
in place. 

You could simply cut it off, but consider this: The 
ground wire is required for use with Commodore busi- 
ness computers. If the Datassette might be used with 
опе of Commodore's business computers, leave it on— 
it’s required by FCC (Federal Communications Com- 
mission) regulations. A Datassette connected to one of 
their commercial computers without the ground braid 
also connected can cause serious television ог radio 
interference. 
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If your Datassette will be used only with a VIC or 
a 64, then cutting it off is a solution. It won't harm the 
Datassette or the computer. 


Programming On The 64 


In the memory map included in the Commodore 64 
Programmer s Reference Guide, locations 124-138 
($7C-$8A) are not shown. What are these locations 
for? Can they be used in machine language 
programs? 

Is it possible to write programs on the 64 that 
will run automatically when they are loaded? If 
so, how is it done? 

How can I change the name of a disk with 
programs on it without destroying or erasing the 
programs? 

John W. Pitkin 


Bytes 124—138 are mentioned in the reference guide on 
page 313. This area of zero-page memory is part of the 
very important CHRGET subroutine, located at ad- 
dresses 115 to 138. 

The CHRGET routine gets the next byte of BASIC 
text. When you run a BASIC program, this routine 
scans the BASIC program lines looking for such things 
as command tokens, commas in DATA statements, etc. 
When they are found, they are processed by the BASIC 
interpreter, the commands are executed, and CHRGET 
scans for the next token. 

Because this routine is essential to BASIC, you 
should not POKE this area or use it for machine lan- 
guage. If you're a machine language programmer, this 
is a good place for a "wedge." For instance, if you want 
to change some of the BASIC commands, you can look 
for your character or token with the CHRGET routine 
and process it accordingly. 

To see just how important this small 24-byte sub- 
routine is, enter and RUN this short BASIC program: 


10 FOR А =115 TO 138: POKE A,0: NEXT 


After RUNning, try typing something from the 
keyboard, then press RETURN. As you can see, the 64 
is unusable. Even RUN/STOP—RESTORE won't help. 

However, these locations should be OK to use in 
pure machine language programs that never access 
BASIC. 

To answer your second question, yes, it is possible 
to LOAD and RUN a program automatically without 
pressing the SHIFT/RUN keys. 


E ът inc. é ; Qi You'll gfow with us. 
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Changing the name (or header) of a diskette after 
it contains programs is tricky—and dangerous—busi- 
ness, but it can be done. 

Track 18, sector 0 of the Commodore diskettes 
contains the directory information (what you see when 
you enter LOAD "'$",8:LIST) and the diskette header. 
The partial layout looks like this: 

Bytes 0-1 Pointer to directory 

Bytes 4-143 Block Availability Map (BAM) 

Bytes 144-161 Name of diskette 

Bytes 162-163 Diskette's two-character ID 


The 18-byte area (144—161) that is used for the diskette 
name contains the name plus shifted spaces (CHR$ 
160) to fill the 18 bytes. It is possible to change these 
bytes on the diskette, but if it is done incorrectly the 
BAM could be altered, and you might not be able to 
access the programs on the diskette. It's safer to simply 
format a new diskette with the desired name. 


Using The Super Expander With 


“Тһе Automatic Proofreader" 

I recently purchased a VIC-20 Super Expander car- 
tridge, and have discovered something discouraging 
about it. When "The Automatic Proofreader" is 
running and I try to use the KEY command or any 
of the function keys, the computer won't cooperate 
and sometimes crashes. What would cause this to 
happen, and what can I do about it? 


William O'Connor 


There is nothing wrong with your Super Expander car- 
tridge. “Тһе Automatic Proofreader” should not be used 
with the Super Expander cartridge plugged in. Both the 
cartridge and The Automatic Proofreader wedge a 
machine language program into the same area of the VIC's 
memory. This conflict causes your VIC to crash. 

Although the Super Expander is incompatible with 
The Automatic Proofreader, other memory expansion 
cartridges will work fine. 


Can I Use A VICmodem With 
A Speaker Phone? 


I belong to several user groups and communicate 
with members on the telephone about specific 
problems and programs. I have found that having 
a telephone beside my computer is very helpful, 
because I can work with the computer while talk- 
ing to someone about a problem. I just purchased 
the VICmodem, and now want to purchase a tele- 
phone that can stay in my work area. 

A speaker telephone would be great because 
both my hands could be free for the computer. 
The speaker telephone that I am interested in has 
a plug on the rear of the unit (to plug in a regular 
handset telephone). If I purchase a short telephone 
extension cord, can I plug one end of the cord in 
the modem and the other end into the modular 
plug on the rear of the speaker telephone? Will 
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the modem function properly with this type of 
hookup? 
Jim Kohlenberg 


Connectors for modular telephone cords come in two 
sizes: one size on the cord that connects the phone to the 
wall plug, and a smaller size on the cord between the 
phone body and handset. The VICmodem takes the 
smaller, handset connector. 

Another modem, of the auto-answerlauto-dial 
type, takes the larger connector and plugs into the wall 
outlet. This type of modem works without a telephone. 

Remember that the VICmodem is designed to con- 
nect to a standard desk phone (with either a dial or 
Touch-Tone buttons). You use the telephone to dial, 
and to make the connection with the other computer's 
phone, then you remove the cord from the handset and 
plug it into the modem. At this point your terminal 
software should send a signal to the other computer that 
you are ready to communicate. 

If that plug on your speaker phone is of the smaller 
size designed to take an extension handset, you should 
be able to connect the VICmodem directly to the speaker 
phone, using a handset-to-phone cord. 

However, if the plug on your speaker phone is 
meant to hook up an extension telephone, you cannot 
directly connect the modem. 

You should also consider that, while a speaker 
phone might have advantages for voice communications, 
it can cause problems when you're using the modem. If 
the speaker is activated at the same time as the modem, 
chances are good that sounds picked up by the micro- 
phone will garble the modem transmissions. Also, in- 
coming signals will be broadcast over the speaker. This 
might be interesting at first, but it will wear on your 
nerves after a while. 

Also, a wide variety of telephone models are avail- 
able, and many have special features which make them 
incompatible with direct-connect modems like the VIC- 
modem. Before you purchase any phone (except the 
standard desk set) for use with a modem, you should 
make certain that the two are compatible. Discuss your 
intended application with a technician at the phone 
store, and, if possible, talk to someone who is already 
using your brand of modem with the phone model you 
want to buy. 


Cold Starting 


Is there any way to reset the VIC-20 without 
turning it off? 
Edward Wiebe 


Yes, there is. If you enter SYS 64802 then press RE- 
TURN, the VIC-20 will go through most of the same 
reset routines that are performed when you first turn it 
on. This SYS will reset the BASIC pointers, reset the 
VIC chip, etc. The corresponding SYS address on the 
Commodore 64 is 64738. This technique is often called 
a cold start. When you turn on your computer with 
the power switch, you are also performing a cold start. 


Now that you have it, put it to work. Có 
TUTOR puts you in сһагде with а Commod 
64 tutorial, screen display editor, sprite edito 
music synthesizer 6 programmer's calculator. 
Use the tutorial to learn what your 
Commodore 64 can do. And how to do it. 
Create, edit 6 save one page of letters À 
and/or pictures with the screen display editor. 
Enter sprites from the Commodore Manual. 
Or make up yo! n edit and save 
them using the sprite ог. Sprite creation is 
quick, and easy. Play music with the music 
synthesizer. Use the programmer's calculator 
to add, subtract, multiply & divide in decimal. 
hexadecimal and binary. Includes АМО, OR, 
XOR, Shift and 175 complement functions. 


Great for new users. C64 TUTOR cures 
computerphobia and promotes computer 


literacy. 


dealer. 


Comprehensive Software Support, 
2916 Arresia В 


Take it from me, with a little power. the 
possibilities are endless. 
Available for $29.95 at your computer 


Rated THE BEST educational 
program for the VIC 20TM by 
Creative Computing magazine. 
Commodore 64 version: “This 
is the best typing tutor we have 
seen yet; it can get your 
children touch typing in short 
order and bring an old hand up 
to speed. Includes excellent 
training modules and an 
arcade type mode to liven 
things up and put some 
pressure оп; *** * +” INFO-64 
Our customers continue to tell 
us of their success.... 

*. . delighted with my son's 
progress ... he is the only 

one in his second grade class 
who touch types at the computer." 


(58 year old man writes) . . . “great, excellent. To me a source 
of great learning ... | just can't express how much | have 
enjoyed it!" 

In daily use by schools across the USA. 


"Computer aided instruction at its best" Commander magazine 


TYPING TUTOR + WORD INVADERS 
The proven way to learn touch typing. 
COMMODORE 64 Tape $21.95 
COMMODORE 64 Disk $24.95 

VIC 20 (unexpanded) Tape $21.95 


NEW! 
= IFR 


(FLIGHT SIMULATOR) 
CARTRIDGE 
FOR THE VIC 20 


COMMODORE 64 
DISK OR TAPE 


$39.95 
JOYSTICK REQUIRED 


R 
ULATOR 
цент, San we 
оса 


Put yourself іп the pilot's seat! А very challenging realistic 
simulation of instrument flying in a light plane. Take off, 
navigate over difficult terrain, and land at one of the 4 airports. 
Artificial horizon, ILS, and other working instruments on screen. 
Full aircraft features. Realistic aircraft performance — 
stalls/spins, etc. Transport yourself to a real-time adventure in 
the sky. Flight tested by professional pilots and judged 
"terrific"! 
ШЕШШ Shioping and handling $1.00 per @® 

шишин order. СА residents add 6% tax. ) 


ACADEMY 
ЛЕП БЕ 


Р.О. Box 6277, бап Rafael, СА 94903 (415) 499-0850 


Programmers: Write to our New Program Manager concerning 
any exceptional VIC 20TM or Commodore 64TM game 
or other program you have developed. 


Transferring Data From BASIC 
To Machine Language 


If there is a numeric constant (2, for example) that 
you want to pass to a machine language program, 
you can do so with the USR command. But how 
can you transfer numbers from BASIC to a 
machine language subroutine without using the 
USR command? 

Heimo Ponnath 


Using the POKE statement for passing parameters 
(data) to a machine language (ML) routine from BASIC 
is probably easier than using the LISR command. 

Before you SYS (transfer control) to your ML 
subroutine, POKE a byte or bytes with the data you 
want to transfer, then pick it up in the ML program 
with either the LDA, LDX, or LDY commands. Here's 
an example. 


In BASIC: 


300 A=57 
310 POKE 251,A 
320 SYS 4096 


In machine language: 


$1000 CLC 
$1001 LDA $FB 
(load the accumulator with the transferred data) 
$1003 ADC #$05 
$1005 etc..... 


Here it is in reverse (transferring data back to BASIC). 
In machine language: 


$1C49 STA $FB 

(store value of data in the accumulator into byte 
number 251) 
$1C4B RTS 


In BASIC: 


500 A = PEEK(251) 

510 continue BASIC program... 
With the single POKE you can transfer values of 0-255 
back and forth. If you want to transfer values larger 
than 255, you can use the following formula. 


Where N= number to be stored: 


NN=INT(N/256):POKE byte1,N-(NN*256):POKE 
byte2,NN 

This method will automatically store a number from 0 
to 65535 using the standard LBHB (low byte, high 
byte) format. That is, it will POKE byte 1 with the 
least significant value, and byte 2 with the most signifi- 
cant. You can then branch to your ML routine and 
process your values as you wish. 

Some good areas on the VIC for temporary data 
storage while doing the transfer are: 


bytes 828-1019 cassette buffer 
bytes 251-254 free zero-page locations 


On the Commodore 64, you can use the above, plus: 


bytes 679-767 unused 
bytes 49152-53247 free RAM @ 


Finally, aliens your kids can reason with 


Spinnaker computer games are lots of fun. They're also 
instructive. Hot destructive. That's why IN SEARCH OF THE 
MOST AMAZING THING "lets your kids negotiate with aliens. 
Hot destroy them. 

It's Amazingly Fun! 

The Most Amazing Thing is out there somewhere. Find- 
ing it won't be easy. Luckily, your kids will have the help 
of old Uncle Smoke Bailey. Because they'll have to fly the 
B-liner, avoid dangerous Mire Crabs, and trade with aliens. 

It takes skill, persistence and imagination to find The Most 
Amazing Thing. Because it's the most elusive thing in the 
whole wide galaxy. But that's what makes it so exciting. 

It's Amazingly Educational! 
Like all Spinnaker games, IN SEARCH OF THE MOST 


instead of destroy. 


AMAZING THING has real educational value. 

Your kids will sharpen their ability to estimate distances 
and quantities, and will become more aware of direction 
and time. They'll develop a knack for economic principles, 
and learn to solve problems through trial and error. 

So if you're looking for exciting computer games that 
give your kids something to think about, just qo IH SEARCH 
OF THE MOST AMAZING THING at your local 
retailer.* It's so much fun 
you'll probably be tempt- 
ed to play it yourself. 


ТІН SEARCH OF THE MOST AMAZING THING is 
compatible with Apple, IBM,” Atari® and 
Commodore 64™ computers 


SPDIYYANHZIS . 


We make learning fun 


Apple, IBM and Atari are registered trademark: 
ІН SEARCH OF THE MOST AMAZING THING con 
©1985, Spinnaker Software Corp All rights re 


gram is a trademark of Spinnaker Software Corp. 


Computer, inc, International Business Machines Corp. and Atari, Inc, respectively Commodore 64 is a trademark of Commodore 


Commodore's 
New Computer 
Family: 


News From 


The Winter 


Consumer Electronics Show 


Selby Bateman, Assistant Editor 


A new line of Commodore computers with 
built-in software options—the 264 family— 
created the biggest stir among computer in- 
dustry retailers and distributors at the 1984 
Winter Consumer Electronics Show (CES). 
Commodore also displayed a growing collec- 
tion of 64 and VIC-20 software, a faster disk 
drive, and a new video monitor. Here's a report 
on the new jap and the new choices facing 
owners and users of Commodore computers. 
Еа as en n] 


pproximately 90,000 people crowded 

their way into the Winter Consumer 

Electronics Show, a breathtaking array 

of almost every conceivable electronic 
audio, video, computer, appliance, and peripheral 
product that manufacturers hope to sell during 
1984. 

Over one-fourth of the 725,000 square feet of 
exhibit space this year was devoted to computer- 
related displays, and nearly 300 of the more than 
1300 exhibitors represented computer products—a 
record on both counts. 

Among the hundreds of exhibition booths 
at CES, none seemed to attract more activity 
and curiosity than Commodore's large gray and 
blue display on the floor of the Las Vegas Con- 
vention Center. 

The company announced that during 1983 it 
became the first microcomputer firm to top the $1 
billion mark in sales, more than doubling its $458 
million 1982 sales figures. Commodore officials 
said that all four of its microcomputer models—64, 
VIC-20, PET, and CBM—achieved record sales 
levels during 1983. 
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But the biggest news was the announcement 
of the new 264 family of Commodore computers, 
which will contain a consumer-selectable choice 
of built-in software; a stronger BASIC language, 
with 60K available for BASIC programming (the 
Commodore 64 has less than 40K of usable BASIC 
RAM) and more than 75 BASIC commands; a new 
keyboard that includes a HELP key, four separate 
cursor keys, and other programmable function 
keys; screen windowing capability; and a built-in 
machine language monitor with 12 commands. 

A company representative says the 264 should 
be available by April 1. Customers will be able to 
purchase the 264 with one of several application 
program options built into ROM, such as a word 
processor, spreadsheet, or data base manager. 
The consumer may have a choice of additional 
software on plug-in ROM chips, but details of the 
various options were still being developed during 
CES. Although Commodore announced no price 
for the 264, company representatives indicate the 
retail price will be under $500. 


W... the new 264 series does not have is almost 
as interesting as what it does. The Commodore 
6475 versatile SID (Sound Interface Device) chip, 
which features three independent voices over 
nine octaves, had been replaced by two tone 
generators. That will mean a reduction in sound 
and music capability. And the 64's eight pro- 
grammable, independently moveable sprites have 
not been included in the 264. 

Although Commodore says that virtually all 
of the VIC-20 and 64 peripherals are compatible 
with the 264, the software is not. Internally the 
264 is significantly different than older Commo- 
dores because of its new operating system and 
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- Introduci acomputer game 
that will bring out the railroad buff, the tycoon, 
the кышы. and the kid in your kid. 


TRAINS is one computer game that will really bring out learning the economics of running a business. 


the best in kids. Of all ages. They're learning to manage financial resources, and to 
Because TRAINS is a Spinnaker game, which means its use different kinds of information in setting priorities. 

a learning game that's really fun to play. And best of all, they're having fun while they learn. 
TRAINS puts kids in charge of an old-time railroad. And Look for TRAINS on disk at your 

whether their railway empire gets bigger or goes out of local software 

business is entirely up to them. retailer, and play 
As they juggle the challenges of picking up supplies and iton your Apple,” 

delivering to various industries, paying their employees, IBM,” Atari," ог 

keeping the locomotive filled with coal, and making enough Commodore 64” 


money to venture into new territories, kids are actually computers. 


SPUYYANL Te 


We make learning fun. 


©1985, Spinnaker Software Corp. All rights reserved. Apple, IBM and Atari are registered trademarks of Apple Computer, Inc., International Business Machines Corp. and Atari, Inc. respectively. 
Commodore 64 Is a trademark of Commodore Electronics Limited. TRAINS Computer Program is a trademark of Spinnaker Software Corp. 


BASIC. Even the cassette buffer has been slightly 
relocated in memory. Also, the central processing 
unit (CPU) is not the 6502/6510 chip found in the 
VIC and 64; itis a new chip called the 7501. 
Luckily, the 7501 appears to be largely compatible 
with the 6500-series chips, sharing the same in- 
struction set. 


ҮТ 
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Commodore's new 264 computer, showing the four separate 
cursor keys (lower right) and the four programmable function 
keys (at left above keyboard). The Commodore 364 will have a 
similar console, but with a 19-key numeric keypad above the 
cursor keys. 


What does all this mean? BASIC programs 
written for the VIC and 64 which do not rely 
heavily on PEEKs, POKEs, sound, or sprite 
graphics probably will work with very little mod- 
ification on the 264-series computers. But machine 
language programs—and BASIC programs which 
manipulate memory with PEEKs and POKEs—will 
need much more translating before they'll work 
on the 264. Almost all commercial software falls 
into the latter category. Commodore estimates 
that 80 to 90 percent of VIC and 64 programs 
should be adaptable to the 264. 

Commodore emphasizes that the new family 
of computers in no way indicates a lessening of 
support by Commodore for the 64, the VIC-20, or 
the company's other microcomputers. As one 
Commodore official says, the 264 is not directed 
at the same set of consumers as are the other prod- 
ucts, especially the top-selling Commodore 64. The 
264 offers built-in software for word processing, 
spreadsheet analysis, data base management, or 
other small business applications, notes Myrddin 
Jones, Commodore's vice president for marketing 
(see interview elsewhere in this issue). The 64 is 
more oriented toward music, sprites, and gaming, 
he adds. 

Commodore is counting on the 264 family to 
complement the 64, VIC-20, and the others, rather 
than to compete with them, Jones says. 


T. new Commodore hardware products and 
options include the following: 
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ө Commodore 264—In addition to the features 
mentioned above, the 264 has 128 colors (16 colors 
with 8 luminance levels); eight volume levels; a 
newly designed 67-key keyboard with four re- 
programmable function keys; input/output (I/O) 
ports compatible with 64 and VIC-20 peripherals; 
and display, resolution, and character features 
similar to the 64. 

€ Commodore 364— Based on the 264, the 
364 has built-in speech capability with a 250-plus 
word capacity (additional vocabulary can be 
loaded from optional cartridges or disks); 48K 
ROM, including operating system, BASIC inter- 
preter, and speech operating system (up to 48K 
additional ROM can be added with various built-in 
software options); and an 86-key full-stroke 
keyboard with a 19-key numeric keypad. No 
suggested price was announced. One Commodore 
representative said the 364 is expected to be avail- 
able by the end of the summer. 

e SX64 Portable Computer—Formerly intro- 
duced as the SX-100 and later the Executive 64, 
the SX64 is a portable 64 rather than a 264-based 
machine. The SX64 has a built-in 5-inch color 
monitor, a 170K built-in 51⁄4-inch floppy disk drive 
(second drive optional), plus other features identical 
to the Commodore 64. The retail price is $995. 

€ 1703 Color Monitor—Housed in a charcoal 
gray box, the new Commodore monitor is similar 
in other ways to the earlier 1702 and 1701. The 
1703 has a 13-inch diagonal screen and is compat- 
ible with the 264 line as well as with the 64, VIC-20, 
and SX64. 

e SFS 481 Fast Disk Drive—The new 5V4-inch 
Commodore disk drive, for use with the 264 and 
364 only, is reportedly five times faster than the 
1541 drive. 

e 1542 Disk Drive—An upgraded version of 
the 1541. Further details will be announced by 
Commodore. 

ө Commodore TouchScreen—A plastic over- 
lay that can be fitted over the front of a television 
set or a video monitor, the new TouchScreen al- 
lows the user to bypass the keyboard completely 
in order to operate such programs as Commodore's 
Magic Desk or to create graphics with the touch 
ofa finger. No word yet on availability or price. 

@ Commodore Light Pen—A pressure- 
sensitive mechanism near the point of this light 
pen allows you to draw and to move objects on 
the screen and to control programs such as Magic 
Desk. 

e Magic Voice Speech Module—The speech 
module plugs into the User Port of the Commo- 
dore 64, and contains an additional port into which 
other cartridges can be inserted. The module has 
a built-in vocabulary of 235 words, spoken by 
what sounds like a female voice. Words can be 
user-defined for various speeds and programmed 


The day you bring your first CAI™ learning 
game home and watch your child play, 
you'll know the excitement of a winning 
choice. 

Active Family 

Your family and CAI's growing family of 
animated, full-color programs have a lot to 
share —beginning with a willingness to 
reach beyond the ordinary to achieve the 
best. 

At Your Command 

You may meet a princess, a juggler or a 
dragon in Wizard of Words.™ You may 
appear as a guest on TV in Master Match,™ 
The Game Show™ or Tic Tac Show.™ Or, 
you may extend these programs still further 
with our LearningWare™ diskettes, offering 
hundreds of questions matched to the 
teaching strategies in the games. In every 
case, CAI puts a world of imagination and 
learning at your fingertips. And puts you 
and your child in control. 

Unique Approach 

Key features place CAI thinking tools in a 
class by themselves: Each program comes 
with its own library of subjects. But that's 
just the start. Our unique authoring system 
let's you or your child create your own 
lessons on any topic, tailoring the program 
to your familys needs —and no computer 
knowledge is required. Add the fact that 
we've kept the vital ingredient —FUN - in 
learning, and our proven success is no 
surprise. Over 2,000 school districts now 
use CAI programs to teach essential 
vocabulary and logic skills in a variety of 
subject areas. 


CAI supports its products —and you —with 
an unconditional guarantee and a free 
backup disk. And provides compatibility 
with the most popular computers: Apple,® 
IBM® (and soon Commodore™). 

Wise Choice 

CAI is a group of experienced educators 
and programmers who believe that success 
begins with opportunities you create at 
home. Ask to see a demonstration of CAI 
programs at your local computer store, and 
see for yourself just how rewarding a good 
education can be. 


Computer v 
Advanced 
Ideas 


Bringing Ideas Home 


1442A Walnut Street, Suite 341 
Berkeley СА 94709 (415) 526-9100 


Apple is a registered trademark of Apple Computers, Inc. IBM isa 
registered trademark of IBM Corp. Commodore is a trademark of 
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directly from BASIC and/or machine language. 
Commodore promises that more words and dif- 
ferent voices will be available in the future on 
disk and cartridge. The speech module has a 
suggested price of $59.95 and can be plugged into 
the SX64 portable computer as well. 

The introduction of the 264 line meant that 
Commodore was one of the few computer com- 
panies to introduce a new machine at the four-day 
CES show, a far cry from last summer's CES in 
Chicago. Seventeen new microcomputers were 
introduced at that time. 


Atari, Inc. introduced no new computers at 
the winter CES. Apple showed up for the first 
time in three years, but chose not to unveil its 
Maclntosh at the show. IBM had no exhibit at all. 
Coleco introduced some new peripherals for its 
Adam computer, including an add-on tape drive, 
a disk drive, 1200-baud modem, and a 64K mem- 
ory expander. Spectravideo announced two new 
computers, and a British company exhibited pro- 
totypes of a new machine which might reach the 
U.S. later this year. But none of these booths were 
as consistently crowded as Commodore's. 


C is continuing to expand its software 
line and announced a variety of personal produc- 
tivity and game offerings. 

For the Commodore 264, Sig Hartmann, presi- 
dent of Commodore Software, says that the com- 
pany plans to have more than 30 software products 
available on cartridge, disk, and tape when the 
264 goes on sale. "The key area we're emphasizing 
in software for the Commodore 264 is productiv- 
ity, covering such areas as household manage- 
ment, word processing, calculation, business 
accounting, and education," says Hartmann. 

Commodore is continuing to encourage third- 
party software development for its computers, 
and introduced a number of new packages which 
were created for it by such companies as Data 20, 
Digital Research, Infocom, Island Graphics, and 
others. For example, Data 20 Corporation of 
Laguna Hills, California, created word processing, 
spreadsheet, and graph software on ROM chips 
for the new 264 computer line, some of which will 
be built-in and some of which will be cartridge 
add-ons. 

Of the more than 200 Commodore-brand 
software products now in distribution, more than 
half were produced by outside developers, a com- 
pany official notes. 

Among the new products are seven personal 
productivity packages, which are scheduled to be 
available by late spring on cartridge or disk for 
the Commodore 64 and 264. Several of the pro- 
grams are planned as built-in software options for 
the 264 as well. The packages are: 
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ө Magic Desk II—Based on the Magic Desk I— 
Type and File cartridge introduced last year, this is 
an enhanced program with an integrated text- 
editor, spreadsheet, file manager, and calculator 
for beginning computer users. Help screens are 
built-in, and the menu system uses icons, or 
picture-symbols, rather than words to convey the 
different functions (similar to Apple's more com- 
plex business-oriented Lisa). 


MusiCalc I from Waveform Corporation turns a Commodore 
64 into a musical instrument. 


€ Commodore 3-Plus-1—This integrated soft- 
ware package includes a word processor, file man- 
ager, spreadsheet, and business graphics. 
Through windowing, the word processor and the 
spreadsheet may be used simultaneously on the 
screen. 

e SuperScript 264—A multifunction word 
processor designed for both beginner and expert 
users, the package includes text editing, number 
calculations, mail-list functions, and a cut-and- 
paste feature for on-screen text editing. 

ө EasyCalc 64 and EasyCalc 264—These are 
spreadsheet programs with color selection and 
graphics. Both packages are sold on cartridge, 
which Commodore says leaves more workspace 
in the computer than comparable disk-based 
spreadsheets. 

© Commodore B/Graph—A business graphics 


: and statistics package, B/Graph computes and 


converts financial and statistical results into three- 
dimensional color charts, graphs, pie charts, 
histograms, and other graphics. 

@ Financial Advisor—A financial aid program, 
Financial Advisor computes loan, mortgage, and 
investment formulas, and is available on cartridge. 

e Teligraphics—This is videotext and graphics 
software for use with Commodore telecommuni- 
cations modems. It allows transmission of pic- 
tures, text, and business graphics over the tele- 
phone and between computers. The package also 
allows users to upload and download data through 
telecomputing services such as CompuServe. 


by ind independent evaluators nationwide as among the finest 


ith your purchase comes a driven program жу 


available. Relax as you learn how to operate your program 
with clear, concise tutorials written by professional writers... 
not programmers. For consultation on your special questions, 
technical support personnel are standing by on a toll-free basis. 


DATABASE MANAGER, $89.95 

* 100% Machine Language * Free Form Design * Sort On Any Field е Calculated Fields 
* Interfaces (о W.P. е Record Size = 2,000 Characters 

ADVANCED REPORT GENERATOR, $49.95 

* Companion to Database * Totals and Subtotals е Field Matching * Expanded Reports 

* Sorting (Up & Down) * Calculated Fields 

WORD PROCESSOR, Professional Version $89.95 

* 80 Col w/o Ача Hdwr * 100% Machine Language * Spelling Checker (30,000 Words) 
* Over 70 Single Keystroke Commands • Printer Command File е Interfaces to Database 
WORD PROCESSOR, Personal Version $39.95 

* 100% Machine Language * True Word Wrap * Printed page/line/character counters 

* Right Justify, Center * Printer Command File е Interfaces to Database 


Ini ACE СОПСЕРСЭ, inc. 


2519 W. Shaw Ave., #106 * Fresno, CA 93711 
"TM — Commodore 64 is a Registered Trade Mark of Commodore Electronics, Ltd. 


For Brochures, Support 
and Information, Call... 


(800) 641-1441 


In California, Call... 


Commodore announced its intention to pro- 
vide 100 different application templates for its 
Manager 64 data base system used by the Commo- 
dore 64. The templates will include five to ten 
specific applications per disk which, when used 
with Manager 64, will allow the user to computerize 
home budgets, index recipes, keep track of sports 
statistics, track business accounts, and carry out 
other functions. 


Among the other software packages announced 
at CES by Commodore are: 

€ Ten new educational software products, 
including the Milliken Edufun (VIC-20 and Com- 
modore 64) series, the Kinder Koncepts (Commo- 
dore 64) series, and two new programs featuring 
the animated “Commodore Kids,” Math Facts and 
Numbers Galore. 

ө Commodore Logo programming language for 
the 64 and 264 computers, with 170K of available 
disk storage. 

ө International Soccer, the first in a series of 
advanced games with three-dimensional color 
animation which Commodore is calling the Gold 
Medallion games. Suggested retail price is $34.95, 
and the game should be available by the time you 
read this. 

€ Other entertainment programs introduced 
include Viduzzles, a series of video puzzles for 
children; Jack Attack, an animated strategy game; 
and Solar Fox, a converted Bally Midway adventure 
game. Initial deliveries are scheduled for this 
spring. 

€ Four new “talking” software products for 
use with Commodore's new Magic Voice speech 
module in the 64 and 264 computers. Two of the 
programs are Bally Midway games—Gorf and 
Wizard of Wor—and two are alphabet and number 
educational packages for young children—A Bee 
C's and Counting Bee. Prices for the games should 
be in the $30-$40 range, Commodore announced. 

ө Micro Illustrator for the Commodore 64 and 
264 computers, a popular "paint" system for cre- 
ation of color graphics. The package uses a menu 
of icons and either a joystick or light pen. The 
Commodore 64 version will use all 16 of its colors 
and was scheduled for February release, while 
the 264 version will have a range of 128 colors and 
is set for an April release. 

e Micro Cookbook for the Commodore 64, a 
household management program providing cook- 
book and recipe management. Features include 
meal planning (plus help with leftovers), a glos- 
sary of cooking terms, calorie and nutritional in- 
formation, and 155 recipes with space for 100 
more. Initial sales were scheduled for early Feb- 
ruary at under $40 each. 

ө Silent Butler, a record-keeping and financial 
management package on disk, which is designed 
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to require little or no instructions, setup process, 
or previous computer experience. The program 
will manage personal finances and records, bal- 
ance checkbooks, pay bills, provide a tax sum- 
mary, and serve as an appointment or special 
date reminder. The Silent Butler comes with a plas- 
tic form with pockets in which the user can place 
personal checks for printing on a 1525, 1526, or 
MPS-801 printer. 


[r companies continue to develop and 
market a growing number of hardware and software 
products for the Commodore microcomputers. 

Chalk Board, Inc., developer of the PowerPad 
touch tablet, announced six new software pack- 
ages scheduled for release in the first quarter of 
1984. They include Leo's 'Lectric Graphics, а 
graphics system which allows users to do finger 
painting, multiple-contact drawing, or a fine, 
point-to-point drawing; Leonardo's Logo, a turtle 
graphics program which employs push-button 
symbolic graphics in place of keyboard entry; 
Leonardo's Philharmonic, a music composition pack- 
age; Boolean Blueprints, an advanced BASIC tutor 
for the novice; Runway, an aircraft navigation and 
piloting simulation program based on geometric 
principles; and Borderline, an international rela- 
tions simulation game. 

AtariSoft, the third-party software publishing 
division of Atari, announced conversions of seven 
hit arcade titles for the Commodore 64 and VIC-20. 
The games are Joust, Battlezone, Pole Position, Ms. 
Pac-Man, Moon Patrol, Galaxian, and Jungle Hunt. 
Suggested prices for each game are $34.95 on disk 
and $44.95 on cartridge. 

Waveform Corp. introduced MusiCalc I, a 
software package designed to transform the Com- 
modore 64 into a three-voice synthesizer with 
realtime sequencing, slide controls, modulators, 
and transposers. The program allows users to 
play along with preprogrammed melodies, or 
create and store their own melodies for later 
playback. The suggested price is $74.95. 


B: Software has converted its popular 
word processing program, Bank Street Writer, to 
disk format for the Commodore 64. Previously 
available for Apple and Atari computers, Bank 
Street Writer displays all functions and commands 
at the top of the screen in order to eliminate the 
need for memorizing codes or command words. 
Suggested retail price is $69.95. 

Human Engineered Software (HesWare), the 
largest single-source supplier of software for the 
Commodore 64, announced seven new educa- 
tional and productivity programs for the 64. Turtle 
Toyland Jr., produced for HesWare by ChildWare 
Corporation of Menlo Park, California, operates 


WHO'S GOT 7 NEW BUSINESS SYSTEMS 


Here's a series of seven 
easy-to-use Manage- 
ment Information Re- 
ports flexibly designed to 
accommodate all small 
and medium size busi- 
ness accounting require- 
ments for Commodore 64* 
computers. 


Inventory Management / 
Sales Analysis Management / 
Accounts Receivable Manage- 
ment and Invoicing / Accounts Payable 
Management and Checkwriting / Payroll 
Management / Cash Flow Management / 
General Ledger 


INVENTORY ACTIVITY REPORT 
JUNE lb, 1988 


PART NUMBER LAST АСТ CUM RCVD — CUM 
D) 


SOLD CUM ADJ ON HAND COST INV eee. 
1004-572 05/18/88 1500! 4850 -50 


1 1100 0.08 88.00 


ACCOUNTS RECEIVABLE AGING REPORT 
JUNE lb. 1988 


CUST-INVCe CUSTOMER NAME — INVC DATE CURRENT THIRTY SIXTY NINETYe 


ACCOUNTS PAYABLE AGING REPORT 
JUNE lb. 1988 


VEND-INVCs VENDOR NAME DISC DATE CURRENT THIRTY SIXTY — NINETY- 


GROSS PAYROLL FOR PAY PERIOD ENDING Ь/15/88 
JUNE lb. 1988 


EMP= EMPLOYEE NAME — REG-PAY OVT-PAY HOL-PAY SIC-PAY OTH-PAY GR EARN YTD GR 


General Overview 


Each system includes: 

AMenu-driven program, sophisticated enough 
to provide complete Management and Product 
information, yet requires no prior computer or 
accounting knowledge to operate. 

A unique method of creating your own, un- 
limited array of reports — easily and quickly. 
YOU select the information you want, and YOU 
determine the sequence of the report column 
headings. 

A program which can be used by itself (stand- 
alone), or can be interfaced, one at a time, with 


FOR МЕ? 3 TIMEWORKS. 


other TIMEWORKS MANAGE- 
MENT INFORMATION pro- 
grams into a fully integrated 
accounting system. 


A Manual written in easy-to- 
understand, people-friendly 
English, abundantly illustrated 
to provide further clarity 
and eliminate guesswork. 

Password Protection, to 

prevent unauthorized ac- 

cess to confidential data. 

Suggested Retail List at 
$59.95 each. 


Customer Support Plan 


Timeworks Telephone Con- 
sulting Service is available to 
all users at no charge to support your installation 
and ongoing operations. 

For further details, contact your local Dealer 
or Timeworks, Inc. Choose from a host of 
Commodore 64 programs. Now at your favorite 
dealer. Or, contact Timeworks, PO. Box 321, 
Deerfield, IL 60015. 312-291-9200. 


Tung 
BUSINESS 
SYSTEMS 


SOFTWARE WITH SUBSTANCE 
— FOR EVERYONE. 


“Registered Trademark of Commodore Computer Systems. ©1983 Timeworks, Inc. All rights reserved. 


with a joystick and teaches turtle graphics and 
programming concepts to children. HesWare also 
announced three new educational titles from Sun- 
burst Software—Factory, for those eight years or 
older, places the user in the role of a design en- 
gineer who must create geometric products on an 
assembly line; M-ss-ng L-nks, ages ten and above, 
is a language puzzle designed to improve spelling, 
grammar, comprehension skills, and writing; and 
Tri-Math, ages 6-12 years, uses an alien space 
intruder, a dinosaur, and a mysterious mansion 
as a part of a math skills program. 

Creative Software, of Sunnyvale, California, 
introduced seven software programs for the 
Commodore 64. Three of them—Joe’s Writer, Fred’s 
Filer, and Jack's Calc—are components of an inte- 
grated personal productivity series the company 
calls the People’s Choice. Designed for older chil- 
dren and adults, the series features a word proc- 
essor, a file manager, and a spreadsheet. Each 
program will be sold separately at a suggested 
price of $49.95. 

Also introduced by Creative Software were 
Crisis Mountain, an action game on cartridge; In 
The Chips (see a review of this game elsewhere in 
this issue), a popular VIC-20 program now avail- 
able on cartridge for the 64, that teaches the player 
the economics of business by pitting him against 
a rival computer software company; I Am The C-64, 


ору with one or 
eee and back- 


wes program names, add, delete files 
keystrokes 

8.) Easy disk initialization 

9.) Supports up to four drives 


two three-program disks (sold separately) that 
teach the user about 64 programming, graphics, 
and sound; and Bumblebee, an educational 
cartridge-based program for children six years 
and older, which introduces the concepts of com- 
puter programming. Each of the programs sells 
for $34.95. 

Program Design, Inc. (PDI), of Greenwich, 
Connecticut, announced the availability of ten 
new program translations for the Commodore 64. 
The programs include Analogies, Vocabulary Builder 
1 and 2, Reading Comprehension: What's Different?, 
Preschool IQ Builder 1, Memory Builder: Concentra- 
tion, Story Builder/Word Master, Code Breaker, 
Number Series, and Shaft Raider. 

PDI President John Victor no doubt spoke for 
quite a few software firms when he stated, “We 
have decided to translate many of our titles into 
the Commodore 64 format...based on its growing 
popularity in the marketplace." 

Victor's comment is a good indication of what 
Commodore 64 owners and, to a slightly lesser 
degree, VIC-20 users will be finding during 1984— 
improved and more plentiful software in all areas 
of computing. The Winter CES not only intro- 
duced a new line of Commodore computers, it 
revealed more clearly that the company's growing 
installed base of 64s and VIC-20s is fertile ground 
for software producers. @ 


2 
*UNGUARD Now allows you to read, write and verify bad sec- UC уа 


tors and errors on your disk making it easy to back-up most 


protected software. 


Ve made 4 


АУ 
fhe Clone Mac 


$49 95 a=, GS CALL (201) 838-9027 


micro 
ШАГЕ U 


Dealers & Distributors 


Inquiries Invited Butler, 


1342 B Rt. 23 
N.J. 07405 


We write your letters. Invitations. 
Resumes. Announcements. 
Applications. Greetings. And many 
more. 100 letters just waiting for 
youtto fillin afew simple details, and 

. .. PRINT! Select a letter and load 
it into your favorite word processor. 
If you don't have one, use our simple 
to operate Better Writer" 

supplied with the package. 


Thank You Letter 


Supports most word processors using your computer ASCII format; $34.95 on disk for Commodore 
64 and Atari (16K) computers. Soon for Apple, IBM and Coleco computers. 


By Stephanie Neuman, Ph.D. 

We decorate your home. Or your office. We teach you about colors, furniture 
layout, and even the theory behind it. Then, by following simple instructions you 
select carpeting, paint walls, move heavy sofa beds — and you get to see it 
BEFORE you make costly mistakes. Amazing! 


$34.95 on disk for Commodore 64. Soon for Atari, Apple, IBM and Coleco computers 


Weturn your disk drive into a powerful, simple to use machine! No more lengthy 
Basic commands... . call the menu anytime, your program in memory remains 
intact until you Load or Run another. Indispensable tool for every drive owner. 


$24.95 on disk for Commodore 64 and VIC 20 computers. 


We give you even more! All Ez/Disk 
functions, PLUS: copy disks with 
oneortwo drives, print files directly 
from disk, and more. 


Menu 3 


$34.95 on disk for Commodore 64. 


We teach you typing. Step by step. 
Easy to follow lessons even kids 
will love. And then, we make you 
type FAST. You actually watch 
your speed increase with every 
drill! 


Lesson 1 


$22.95 cassette, $24.95 on disk for Commodore 64 and Atari (16K) computers. Soon for Apple, IBM 
and Coleco computers 


Perspective 


Menu 2 


We save you time. All you need is 
immediately at your fingertips. No 
more endless paging through 
manuals and books. Basic 
command, memory locations and 
maps, sprites, sound and more. 


SoftlLay 64 


$8.95 for Commodore 64 and VIC 20 computers. 


ASK FOR THESE SOFTRON PRODUCTS AT YOUR FAVORITE COMPUTER STORE OR, DIRECTLY FROM US: 
150 Nassau Street = Suite 2024 * New York = New York 10038 = Telephone: (212) 608-2922 = Orders Only: (800) 237-8400/Ext. 111 
Dealer and Distributor Inquiries Invited 


WE MAKE YOUR LIFE EASIER. 


Send check or money order plus $2.00 to cover shipping costs. Add $3.00 for COD. New York residents add 8.25% sales tax. 


Commodore 64, VIC 20, Apple, Atari, ІВМ and Coleco are trademarks of Commordore Electronics, LTD., Apple Computer, Inc., Atari, Inc., IBM Corp. and Coleco respectively, SOFTRON, Better Letter Writer, 
Better Writer, Home Decorator, Quick Touch Typing, Ez/Disk, Ez/Disc Plus and Keyboard Soft/Lay are trademarks of SOFTRON, Inc. 


© 1984 Softron Inc. All Rights Reserved 


Robots: 


The New Mobile 
Computers 


Selby Bateman, Assistant Editor, Features 


The robot, one of the most popular of science 
fiction subjects, is now appearing on store 
shelves as a personal, programmable micro- 
computer on wheels. Although personal robots 
haven't achieved the mass popularity of home 
computers, they are finding an eager audience 
as a combination computer toy and tinkerer’s 
playground. 


B.O.B., Jenus, HERO I, RB5X, Shakey, Freddy, 
Epistle, Topo, F.R.E.D. 


he names aren’t as famous as the fictional 

R2D2 or C3PO, yet these are the real 

pioneers that later generations of robots 

may someday view as venerable ancestors. 
They are contributing to what one American com- 
pany now calls the Age of Robotics. 


S uu new robots are being introduced this 
spring and others that were marketed in 1983 are 
also available, with prices ranging from about 
$350 up to $5000. 

This generation of personal robots can speak, 
sing, deliver messages or trays of hors d'oeuvres, 
wake you up in the morning, answer phone calls, 
and play games—all under strictly limited condi- 
tions. Their shapes are closer to fire hydrants on 
wheels than to humans, but manufacturers are 
working to make them, as one industry leader 
says, "charming." 

This year may well be remembered as the 
one in which personal robots first began to capture 
the public's fancy. 
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Itis no coincidence that the first International 
Personal Robot Congress (IPRC) is set for this 
year. Between 3000 and 5000 people are expected 
to attend the three-day event, April 13-15 in 
Albuquerque. À potpourri of commercial exhibits, 
seminars, amateur robotics competitions, demon- 
strations, and lectures by leading robotics experts 
is planned. And the first Golden Droid Awards will 
be presented to the best amateur robot builders in 
several categories. 

The idea for the IPRC began with Joseph 
Bosworth, president of RB Robot Corporation in 
Golden, Colorado. RB Robot, maker of the RB5X 
personal robot, is one of the three major personal 
robot companies in the U.S. The other two are 
Androbot, Inc., of San Jose, California, producer 
of Topo, B.O.B., and a couple of other robots; 
and the Heath Company of Benton Harbor, Michi- 
gan, creator of the HERO I robot. 

Bosworth talked over his idea for the congress 
with executives from Androbot and Heath. He 
found them interested. “In keeping with what all 
three of these companies are doing in pioneering 
the industry, there really needed to be some kind 
of industry kickoff," says Bosworth. "It's exciting 
and it's been a lot of fun to plan. Albuquerque is 
going to be one crazy town that weekend." 

Appropriately, the keynote speaker for the 
event will be Isaac Asimov, whose prolific literary 
output has included three novels and more than 
two dozen stories with robots as central figures. 

Asimov essentially redefined the way science 
fiction writers portrayed robots. His fictional 
robots are machines of intelligence and rational 
thought, programmed to follow Asimov's classic 
Three Laws of Robotics: 


LAST NICHT, COMPUSERVE TURNED THIS 
COMPUTER INTO А TRAVEL AGENT FOR JENNIE, 
A STOCK ANALYST FOR RALPH, AND NOW, 
IT'S SENDING HERBIE TO ANOTHER GALAXY. 


NO MATTER WHICH COMPUTER 
YOU OWN, WE'LL HELP YOU GET 

THE MOST OUT OF IT. 

If you've got places to go, 
CompuServe can save you time and 
money getting there. Just access the 
Official Airline Guide Electronic 
Edition—for current flight schedules and 
fares. Make reservations through our 
on-line travel service. Even charter 
a yacht through "Worldwide Exchange” 

If your money' in the market, 
CompuServe offers a wealth of 


prestigious financial data bases. 
Access Value Line, or Standard and 
Poor's. Get the latest information on 
40,000 stocks, bonds or commodities. 
Then, consult experts like IDS 

or Heinold Commodities. All on line 
with CompuServe. 

Or if, like Herbie, intergalactic 
gamesmanship is your thing, enjoy the 
best in fantasy, adventure, and space 
games. Like MegaWars, the ultimate 
computer conflict. 

То get all this and more, you'll 


need a computer, a modem and 
CompuServe. CompuServe connects with 
almost any personal computer, terminal, 
or communicating word processor. 

To receive an illustrated guide to 
CompuServe and learn how you can 
subscribe, contact or call: 


CompuServe 


Consumer Information Service, P. O. Box 20212 
5000 Arlington Centre Blvd., Columbus, OH 43220 


800-848-8199 


In Ohio call 614-457-0802. 


An H&R Block Company 


[7353 


Elite Club 


Write for a FREE catalog and 
information. 

mes are also available on disk 
and cassette for the Atari, Apple and IB 
home computers. 


Synapse 99 


Name ы сс E E ы 
Address Есе сс аны 
City Se E re eee 
State D pees др л сереш 


Computer 


1. А robot may not injure a human being, or 
through inaction, allow a human being to come to 
harm. 

2. А robot must obey the orders given it by 
human beings except where such orders would 
conflict with the First Law. 

3. A robot must protect its own existence 
except where such protection would conflict with 
the First or Second Law. 


p 


Androbot's Topo, a three-foot-tall computer-peripheral robot, 
will be available this year for Commodore, Apple, and IBM 
computers. Base price is $1595. 


P: s interest in robots has not been limited 
to our own time. History is full of examples of 
our fascination with automatons, the precursors 
of robots which could move by themselves and 
be directed to perform predetermined motions. 
The ancient Egyptians constructed complicated 
water clocks. The Greeks and the Chinese built 
water-driven figures which performed a variety 
of movements. 

One of the most famous automatons, The 
Scribe, was created in the eighteenth century by 
Swiss craftsmen. This lifelike figure of a child 
seated at a drawing table writes with a quill pen 
and dips the pen into an ink well. Even the doll's 
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eyes are animated; they follow the pen as it moves 
across a sheet of paper. The mechanism that drives 
The Scribe, and a similar automaton called The 
Draughtsman, is an intricate clocklike machine 
with a complex series of disks, springs, and cams. 
Both of these early robotic forms are still func- 
tional. (Mary Shelley reportedly visited an exhibit 
of these renowned automatons just a year before 
her book, Frankenstein, appeared.) 

The word robot comes from the Czech word 
for worker, robota (or the closely allied word, 
robotit, meaning “to drudge”). It was first used in 
a 1921 play by Karel Capek, R.U.R. (Rossum’s Uni- 
versal Robots), in which robots destroy the human 
race. It was this negative view of robots as soulless 
machines bent on destroying their makers from 
which Asimov departed. 

Since Capek, science fiction writers by the 
hundreds have vested robots with a wide variety 
of abilities and personality traits. Movies have 
given us a clear, if fantastic, image of robots, rang- 
ing from the evil human impersonator in Fritz 
Lang’s Metropolis (1926) to the droids in George 
Lucas’s Star Wars trilogy, which possess the full 
range of human characteristics. 


Wie science fiction has aided us in visualizing 
what we want in a personal robot, industrial ro- 
botics research has provided much of the 
hardware development. American industry uses 
robots in auto assembly lines, oil drilling opera- 
tions, coal mines, and hundreds of other places. 
There are robotic mail carriers that roll through 
corporate offices, automated tractors that deliver 
and pick up parts, and welding machines that 
exhibit tireless accuracy. Robots tend machines, 
paint, handle parts, and inspect assembly of 
products. 

Approximately 7000 industrial robots operate 
in the United States, about 9000 in Europe, and 
Japan may have as many as 30,000. The Japanese 
have made robot development a national goal, 
with full government backing and a multimillion 
dollar investment. 

The Robot Institute of America, an industry 
support association with 255 corporate members, 
estimates that by 1991 there will be more than 
100,000 robots installed and operating in 0.5. 
plants. Joseph Engelberger, considered the father 
of robotics, says that within ten years the robot 
industry will be a $3 billion a year enterprise. 

This June the largest industrial robotics show 
of its kind, Robots 8, is expected to draw more 
than 20,000 people to Detroit. Another industry 
support group, Robotics International of the 
Society of Manufacturing Engineers, has a mem- 
bership of more than 10,000 engineers, educators, 
and consultants. It is planning a conference and 


“Мох Your Commodore 64" 
Can Print Like a Pro!" 


| Grapp 


Printer Interface 


ler С? 


The Revolutionary Printer Interface for the Commodore 64™ 


A New Era in 
Commodore Printing Power. 


Grappler CD offers the first complete answer to 
your printer interfacing requirements, with many 
powerful capabilities unique in the Commodore 
marketplace. Complete signal translation allows 
many popular name brand printers to operate 
perfectly with the Commodore 64, or to imitate 
Commodore's own printer. Even Commodore's 
graphic character set can be reproduced on 
Epson, Okidata, Star, ProWriter and other popular 
printers. 

Exclusive Grappler CD features provide a variety 
of graphic screen dumps, text screen dumps and 
formatting. No other Commodore interface can 
offer this. 


If you own a Commodore 64... 
If you're serious about quality, trouble free 
printing... You need the Grappler CD. 


Contact your nearest Commodore dealer or call 
Orange Micro for a dealer near you. 


Commodore 64 and Commodore 1525 are trademarks of Commodore Electronics Limited. 
Epson is a registered trademark of Epson America. Inc 


A Uniquely Intelligent Interface: 


* Prints Screen Graphics Without Software 

* Graphics Screen Dump Routines Include 
Rotated, Inversed, Enhanced and Double Sized- 
Graphics. 

* Full Code Translation From Commodore's PET 
ASCII to Standard ASCII, the Language of Most 
Printers. 

* Complete Emulation of the Commodore 1525 
Printer for printing of Commodore's Special 
Characters. 

* Dip Switch Printer Selection for Epson, Star, 
Okidata, ProWriter and other popular printers. 

* Conversion Mode for Easy Reading of Special 
Commodore Codes. 

* Text Screen Dump and Formatting Commands 

* 22 Unique Text and Graphics.Commands 


ға ; 
Ого nge Micro 

пс. 
1400 N. LAKEVIEW AVE., ANAHEIM, СА 92807 U.S.A. 


(714) 779-2772 TELEX: 183511CSMA 


© Orange Micro, Inc., 1983 


trade show, Robots West, for next November in 
Anaheim, California, that may attract as many as 
15,000 participants. 

1984's robots are a far cry from the multi- 
talented, two-legged science fiction versions. Yet, 
robotics technology has come a long way in a very 
short time. It has been the computer, with its tiny 
chips and integrated circuits, that has made those 
gains possible. 


F.R.E.D. (Friendly Robotic Educational Device), a 12-inch, 
$349 robot that speaks, moves, and draws, and can be directed 
by an infrared signal from the remote control device at right. 


During the late 1960s, scientists at Stanford 
Research Institute (SRI) International created a 
forerunner of the present group of personal 
robots. It was aptly named Shakey. Mounted on 
the robot were an arm, a television camera, and 
grippers. Shakey was programmed to roll around 
in a small, five-room environment, shifting and 
stacking boxes on command. 

In the 1970s, a robot named Freddy was de- 
veloped at Edinburgh University. Freddy was a 
large suspended arm with a gripper, similar in 
form to some assembly-line industrial robots of 
today. Freddy's job was to choose appropriate 
parts from a pile in order to make toys. 

These and other early experiments in robotics 
demonstrated to engineers the enormous com- 
plexity involved in creating robots which could 
make decisions in even the simplest fashion. How 
could someone tell Shakey all of the possible deci- 
sions to be made in finding a particular box and 
moving it next to another box? And what if neither 
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box was in the room occupied by Shakey? The 
computer program which drove Shakey had to 
work out each step of the desired action from a 
limited number of movements at its disposal. The 
number of Shakey’s potential decisions quickly 
produced a mathematical explosion of options. 

Freddy’s job was no easier. The robot had to 
be shown each step of a successful operation and 
then it repeated the process. If its limited sensing 
mechanism couldn't find the correct shape of a 
toy part from the pile of parts at its disposal, it 
would pick through the pile. But if stymied, 
Freddy would smash its arm into the pile of parts, 
trying to break them into something it could 
recognize. 


Rois are getting smarter, however. Jenus, a 
robot created by Robotics International Corpora- 
tion, rolls under its own power. When its batteries 
weaken, it locates an electrical outlet and plugs 
in. IBM is reportedly working on a robot called 
Epistle that will read the mail and then pick out 
the more important letters by looking for certain 
phrases or words previously embedded in its 
memory. 

Robotics pioneer David Heiserman, a con- 
sultant and author of How To Design and Build 
Your Own Custom Robot and four other books on 
robotics, believes there are many people who 
want robots but can’t justify the expense. Unlike 
the microcomputer, a robot cannot yet be called a 
utility item for the home of the individual. 

"I'm very optimistic about how it's going to 
turn out," says Heiserman. "But the people who 
are manufacturing these commercial hobby robots 
will go through a difficult period. They have to 
put a lot of money into product development and 
support for the robot without any return for a 
while." 

That's not the view that the manufacturers 
are taking. Rick Gibson, marketing manager for 
Androbot, says that initial response to the com- 
pany's product has been overwhelming. He be- 
lieves that sales of robots in 1984 will be brisk 
among dedicated computer hackers and hobbyists. 

The real challenge for Androbot and other 
robot producers will follow this first burst of en- 
thusiasm among those already fascinated with 
robotics. “Right now we're trying to increase the 
robots' capabilities so that after the initial market 
of instantly interested people is satisfied, we'll 
have robots that are more productive and can do 
some things," says Gibson. ^By the end of 1984, 
we'll be able to offer the options that will interest 
the next phase of the marketplace." 


А...-ь< introduced а prototype version of its 
robot, Topo, in the spring of 1983. The 33-pound, 
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COMPUTE's GAZETTE Disk will premier 
with the May 1984 issue of COMPUTE!’s 
GAZETTE. When you subscribe to COM- 
PUTE's GAZETTE Disk each month you will 
receive a fully tested 5’4-inch floppy disk 
which will run on either your Commodore 
VIC-20 or 64 personal computer. Each 
issue of COMPUTE's GAZETTE Disk will con- 
tain all of the programs which appear in 
the corresponding issue of COMPUTE!’s 
GAZETTE. You'll save hours of typing time 
and be able to enjoy all of the high quality 
software found each month in COMPUTE''s 
GAZETTE. 


€ Props — a fast paced, nonviolent 
game for the Commodore 64. Ani- 
mated with machine language, the 
game puts you in control of a pigeon 
lost in a dangerous sky filled with 
whirling propellers. Your goal is to 
make it across the sky to find your 
skittish mate, who moves unpredict- 
ably from coop to coop. 

€ SuperSprite — an unsteady flyer de- 
pends on you to guide him down 
through a series of unfriendly kryp- 
tonite barriers. For the Commodore 
64, SuperSprite makes effective use of 
sprite animation and sound. 

€ PRINT Sound — a utility for the VIC- 
20 which translates letters into musi- 
cal notes. All you supply is a simple 
PRINT statement. 

€ Sound Story — an exciting demonstra- 
tion program that illustrates the 
sound capabilities of the VIC-20. А 
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story with screen text comes to life 
with the sound of crickets, lightning 
and thunder, a UFO in flight, and 
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and many more! 


To Order: 
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the attached post paid card or call COMPUTE's 
GAZETTE TOLL-FREE 800-334-0868 (in North Caro- 
lina 919-275-9809). All orders must be prepaid— 
send check or money order or charge to VISA, 
MasterCard or American Express. 


Subscription Rates: 
Six month subscription $39.95 
(add $18 shipping and handling outside the US 


and Canada) 


One year (12 mo.) subscription 
(add $36 shipping and handling outside the US 
and Canada) 


$69.95 


Individual issues of the GAZETTE Disk can be or- 
dered for $7.95 (in the US and Canada add $1 per 
issue for shipping and handling. Outside the US 
and Canada add $3 per issue). Individual issues 
can be ordered by calling TOLL-FREE 800-334-0868 
(in North Carolina call 919-275-9809), or by sending 
your prepaid order to: GAZETTE Disk, Р.О. Вох5406, 
Greensboro, NC 27403. 


three-foot-tall robot was a 
wheeled computer peripheral 
that could be programmed 
through the keyboard of a 
microcomputer. АП 650 of the 
prototypes sold at a price of 
$495 each. 

At the Comdex show in 
Las Vegas last November, 
Androbot introduced a new 
digital Topo. Although it shares 
the name and physical appear- 
ance of the earlier prototype, 
the new Topo is a much more 
sophisticated robot. Topo can 
be programmed to talk in two 
different ways. It has a text- 
speech capability that allows 
the user to type in what to say, 


Androman, a 12-inch-tall computer-peripheral robot that plays games. 


Obstacles In Robot Development 


Major advances have been made in the 
sophistication and adaptability of robots. 
There are significant problem areas, however. 


Discriminating Vision: A robot's visual sen- 
sor is usually a television camera. The camera 
translates what it sees into picture elements 
(pixels). Each of the many pixels is then given 
a numerical value based on the varying levels 
of light. The number patterns are analyzed 
by the computer, which matches these pat- 
terns to corresponding values previously 
embedded in memory. In this way, for ex- 
ample, a robot can find a particular item it 
has been programmed to seek, such as parts 
of a machine it is building. 

In the past, a computer's ability to proc- 
ess visual images has been relatively un- 
sophisticated and slow. Scientists are now 
working to perfect a pattern-finding function 
which will allow the computer to discriminate 
swiftly among images and even to add new 
information to its visual senses. 


Bipedal Locomotion: Do you want your robot 
to climb stairs, go up a ladder, or step over а 
curb? That's not yet possible. Why do you 
think most robots roll along like R2D2 rather 
than walk as does C3PO? Even a toddler can 
outwalk a robot. But that will change. 
Robotics engineers at places like Carnegie- 
Mellon’s Robotics Institute are making great 
strides in this area of research. There are 
already prototypes that walk with the multi- 
legged style of a spider and that bounce from 


34 COMPUTE!’s Gazette April 1984 


place to place like a pogo stick. 


An Adaptable Hand: Robotic hands are de- 
veloped to the point that they can hold almost 
anything a human hand can. What hasn’t 
been perfected is a robot’s hand with the 
adaptability of our four fingers and opposable 
thumb. For a robot to hold a paint sprayer 
takes one type of gripper. The same robot 
needs a different mechanism to hold a can. 
And yet a third robotic hand might be re- 
quired to grasp a vacuum cleaner nozzle. 


A Natural Language: To communicate with 
your Commodore 64 or VIC-20 requires a 
language such as BASIC, which will translate 
human ideas into numbers the computer can 
understand. But there are tremendous prob- 
lems involved in telling a robot to carry out 
what may appear at first to be even the 
simplest function. Computer-driven robots 
cannot become popular and useful until there 
is a way for humans to communicate with 
them without having to learn a complex 
programming language. 

This is a central concern of artificial in- 
telligence research (А1), one of the most in- 
triguing and controversial aspects of com- 
puter science and robotics. For over 25 years 
Al researchers have worked to improve the 
way in which humans communicate with 
computers. LISP (List Processing), SHRDLU, 
and other experimental natural languages 
have been developed to help solve this fun- 
damental problem. The search continues. 
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attackers plummetting, 
the fuel gauge flashes a 
low fuel warning. . 
SKYHAWK runs in 3K or 
BK with a Joystick 
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A fully animated arcade 
game with Loveable 
Turtles, Cuddly Graphics 
and more Cuteness than 
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game for the young ас 
heart and people who 
have tired of alien 
bashing 
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SUUE attacking 
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firing and still bombing 
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below, the sound of 
explosions rumbles away 
over the landscape 
TORNADO runs on an 
unexpanded VIC20 + 
Joystick 


Please send me a free color catalog 
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press the return key, and have Topo speak. The 
other method is a phoneme system that allows 
Торо to sing, to speak in foreign languages, and 
to make sound effects. This second form allows 
the user to control the pitch, speed, ard volume 
of Topo's voice. 

The base price for the new Topo is $1595. The 
robot is controlled by an infrared link housed in a 
transceiver (base communicator) that plugs into 
an Apple computer. During the second half of 
1984, Androbot has plans to introduce a Topo 
version for Commodore and IBM PC computers. 


Heath's HERO I robot, a programmable computer on wheels 
that sells for a base price of $2500 assembled ($1500 in full 
kit form). 


Topo can move at a speed of about two feet 
per second, contains three 8031 microprocessors 
(two on-board and one in the base communicator), 
and has eight card slots (two already in use for 
motion control and communication/speech con- 
trol). Also available are a number of educational 
and instructional software programs and an at- 
tachable Androwagon that carries up to 20 
pounds. Topo is upgradable and takes commands 
from the keyboard or through a joystick. 

Androbot, a company established by Atari 
founder Nolan Bushnell, is currently introducing 
two more personal robots. B.O.B. (brains-on- 
board), as its name implies, is the most sophisti- 
cated of the robots being created by the company. 
In addition to its two Intel 8086 microprocessors, 
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B.O.B. has three megabytes of memory. It can be 
programmed to navigate through an area, re- 
member those patterns, speak, and choose from 
over 100 stored words and phrases. 

"Initially B.O.B. will be a robot for pro- 
grammers, hobbyists, and computer buffs," says 
Rick Gibson. "Through additional software in the 
future, B.O.B. will develop into a highly sophisti- 
cated robot, ultimately evolving over the years 
into a personal servant. It has the equivalent 
capabilities of an IBM PC on-board, and programs 
can be written either on an IBM PC or an Apple II 
with a modem." 

The base price for B.O.B. will be approxi- 
mately $2000. With accessories, the price can go 
as high as $5000. 

Androbot is also introducing F.R.E.D. 
(Friendly Robotic Educational Device). Aimed at 
the educational field, F.R.E.D. has an infrared 
controller which can be used to make it talk, move, 
or control a drawing pen mechanism. F.R.E.D. is 
12 inches high, weighs two and a half pounds, 
and costs $349. 

F.R.E.D. comes with a utility wagon and a 
pen activation arm that will accept future acces- 
sories. The robot has a 45-word vocabulary and is 
expandable. Androbot plans to make F.R.E.D. 
compatible with almost all personal computers, 
although the infrared controller means that the 
computer is not essential. Like the other robots, 
F.R.E.D. can detect a void around it and thus 
protect itself from rolling off the edge of a surface. 

Finally, Androbot has created Androman, a 
12-inch tall game robot for use with an Atari VCS 
2600 or VCS-compatible machines. This game 
robot comes with a joystick controller that works 
via a remote infrared signal, a game cartridge, a 
transmitter, a game-playing field, a set of game 
pieces imprinted with coded information, and an 
instruction manual. Play involves shifts between 
the computer monitor and the playing field. 


The HERO I (Heath Educational RObot) was 
introduced a little over‘a year ago by the Heath 
Company, which so far has sold several thousand 
of them at about $1500 in kit form and $2500 
factory-assembled. Without the optional arm and 
voice capability, the kit sells for about $1000. 

"It's been an extremely good seller for us," 
says Douglas Bonham, director of Heathkit/Zenith 
Educational Systems. “The Heath robot incorpo- 
rates all of the basic systems found on modern 
industrial robots, plus a few that are still in the 
experimental stage of industrial application." 

At 20 inches tall and 39 pounds, HERO I looks 
something like the robot R2D2 of Star Wars fame. - 
The turret-like head rotates up to 350 degrees and 
carries an arm mechanism, programming 
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e Eliminates the need for a CMS data base program to store tax items — TaxWare™ stores and calculates all 
in one. 
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e Lists are easily displayed and updated totals are automatically transferred to the proper tax forms. 
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* Handles all forms: 1040; 2441, Schedules A, B, C, D, E, G and W. 


FREE Backup Disk Included and Continuous Updates Available. 


Tax Deductible as a Tax Preparation Aid. 2042 Marshall Ave. 
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(612) 644-1551 


Dealer Inquiries Invited 


1-800-447-3273 
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keyboard, and experimental circuit board. 

HERO I has its own on-board programmable 
computer and contains electronic sensors to detect 
light, sound, motion, and obstructions. The robot 
is advertised with Heath's robotics education 
course, which reflects their goal to market HERO 
Iasan instructional tool. 

The unit uses a 6808 microprocessor, has a 
hexadecimal keyboard with multifunction keys, 
and includes a synthesized phoneme-based 
speech system that generates 64 different basic 
sounds to simulate human speech or sound effects. 


The RB5X, marketed by RB Robot Corporation, 
stands about 23 inches tall without the optional 

arm which can be mounted between the robot's 

dome and the body. Cartridge slots are included 
for later expansion. 

Optional add-ons include a 10-key number 
pad, a compass, and even a fire extinguisher 
nozzle. It is programmable in BASIC on any com- 
puter using the RS-232 interface. 

The unexpanded unit sells for $1795. An op- 
tional arm is priced at $595 and a voice capability 
is available for $195. 

“We think the personal robot industry will 
follow the kind of explosive growth that we've 
had over the past six years in the personal com- 
puter field," says RB Robot's Bosworth. “The 
horizon is more like 5 to 10 years and not 10 to 15 
years.” 

For the future, advances in robotics tech- 
nology will be affected by improvements in several 
crucial areas of research. Large-scale integration 
of computer systems will bring greater produc- 
tivity and adaptability to entire factories of robots. 
More sophisticated hierarchies in robot control 
systems will mean that sensory devices will be 
more effectively used. 

Artificial intelligence (AI) research, the at- 
tempt to simulate human thought processes and 
experiential learning in computers, may hold even 
greater solutions in the field of robotics. Some AI 
scientists envision that in the early years of the 
twenty-first century there will be few areas of 
human thought that computers will not be able to 
duplicate. 

Although the AI field is as controversial as it. 
is complex, it has already brought advances in 
computer languages, robotic sensory-control co- 
ordination, problem-solving structure, and a host 
of human thought-related subjects. 

Personal robots may not yet have all the ad- 
vanced abilities we popularly associate with 
robots. But the HEROS, B.O.B.s, and RB5Xs that 
may roll through your house this year are the first 
steps in making this science fiction staple a popu- 
lar, affordable science fact. 
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The RB5X, produced by RB Robot corporation, is a 23-inch- 
tall programmable robot, which can be plugged into a com- 
puter for instructions. Preprogrammed EPROM cartridges 
can also be used to direct the RB5X. 
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14618 West 6th Ave., Suite 201 
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Programs for the Commodore 64 


dMOS" 
Database Management 
Operating System 


The BEST data base managernent tool 
for the collection, arrangement and display of 
alphanumeric data. 
A unique pattern matching and searching capabilities 
make dMOS™ the easiest DB system available 
on the market. 
Features: 
е Map search technique to achieve a "logical AND", 
while searching between fields. 


е Display records found, or NOT found by a search. 
е Rearrange fields. 

* Suppress fields and field titles. 

* Insert short (10 character) text. 

е Selectively print records. $39?5 
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Missing Key.. Phone Boss” 


A reset System 
Restores your BASIC Program. 


After programming for hours you 
press RUN for a final check of your work — 
the computer locks up. You press RUN, STOP... 
nothing — you press RESTORE. . . nothing — you 
look for the missing key but it isn't there. You 
have to turn off your computer and lose hours of work!! 


Now Add the Missing Key™: 


е Press the "Missing Key™” and the computer 
resets itself from any lockup, and your BASIC 
program is restored. 

* Load and run the program included. 

* Takes nothing away from your computer, neither 
memory nor a plug-in port. 

* Attaches to your C64 keyboard or any other 


convenient location. The user has complete control of 
* Will not void your CBM warranty. $2995 15 category titles and entries. $29°5 


Personal Phone Directory Program 


Designed to store and organize 
your personal phone listings. 
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How To Start 
A User Group 


Kathy Yakal, Editorial Assistant 


A user group is a good resource for program- 
ming tips, free software, and new ideas on 
how to use your computer. If you can't find a 
group that meets near you, then why not start 
your own? Here are some suggestions. 
ES) 


When the first Commodore PETs were imported 
into Canada about five years ago, Mike Bonny- 
castle bought one. He was looking for a micro 
that he could use in his business and hadn't been 


pleased with other machines available at that time. 


“Up to then, there wasn’t a viable machine,” he 
says. “That 8K PET was about a hundred times 
better than I thought it would be.” 

But there were some things about the PET 
that Bonnycastle didn’t understand. He went 

` back to the Commodore dealer. “I don't know 
how to do that either,” the dealer said, “but you 
might try calling a guy named Jim Butterfield.” 
_Bonnycastle looked up Butterfield in the 

Toronto phone book and called him. “Why don’t 
you come over this afternoon?” Butterfield said. 
Bonnycastle arrived at the house and found 
another Commodore owner, Lyman Duggan, 
also waiting to talk to Butterfield. The three of 
them sat down and talked Commodore. As they 
parted, one of them said, “Why don’t we do this 
again sometime?” 

And that was the first meeting of TPUG, the 
Toronto PET User Group. 


Simple Beginnings 
Though they didn’t know it that Saturday after- 
noon, what those three men started would grow 
to. be one of the largest and most respected Com- 
modore user groups in the world. The single ele- 
ment that they had in common was a desire to 
learn more about the ins and outs of Commodore 
computers, and a willingness to share what they 
had learned with others. 

If you have wanted to start a user group but 
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hesitated because of the enormity of the task, it 
may be because you're looking at the huge groups 
that have evolved over months or years, like TPUG 
with more than 13,000 members. There are 
thousands of programs in its public domain soft- 
ware library and an annual convention in Toronto 
that attracts people from all over the world. A 
full-time staff runs the group's office. 

Large, successful user groups don't just 
materialize. Most of them start with a handful of 
individuals who want to learn more about an ex- 
citing hobby. 


“І Wanted Company” 

Frank Topping bought a VIC-20 in December, 
1982. Retired, he lives in Englewood, Florida, a 
community of about 20,000 people. An amateur 
radio operator with several friends who owned 
computers, he looked around to see if there was a 
user group in the area. 

"I wanted company,” says Topping. “Сот- 
puting is lonesome without other computer hob- 
byists." Finding no established group close 
enough to join, he decided that, with a little initial 
organization on his part, the Commodore owners 
in Englewood could have their own group. 

Topping contacted the local media to see if 
he could get some publicity for the group's or- 
ganizational meeting. Four newspapers wrote 
articles about his efforts, and the station manager 
of WENG-AM in Englewood interviewed him on 
the air one morning. 

“It was very successful,” says Topping. “I 
got lots of phone calls, and 14 people came to the 
organizational meeting at my home." It soon be- 
came evident that Topping's home wasn't big 
enough for group meetings, so they contacted a 
local savings and loan who let them use a meeting 
room free of charge. “Bits & Bytes," the Computer 
User Group of Englewood, Florida, that Frank 
Topping started, has more than tripled in size 
since that first meeting. 
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ming tips, free software, and new ideas on 
how to use your computer. If you can't find a 
group that meets near you, then why not start 
your own? Here are some suggestions. 

[Dex Fas arava asec ғ) 


When the first Commodore PETs were imported 
into Canada about five years ago, Mike Bonny- 
castle bought one. He was looking for a micro 
that he could use in his business and hadn’t been 


pleased with other machines available at that time. 


“Up to then, there wasn’t a viable machine," he 
says. “That 8K PET was about a hundred times 
better than I thought it would be.” 

But there were some things about the PET 
that Bonnycastle didn’t understand. He went 

` back to the Commodore dealer. “I don’t know 

how to do that either,” the dealer said, “but you 
might try calling a guy named Jim Butterfield.” 

'  Bonnycastle looked up Butterfield in the 
Toronto phone book and called him. “Why don't 
you come over this afternoon?" Butterfield said. 
Bonnycastle arrived at the house and found 
another Commodore owner, Lyman Duggan, 
also waiting to talk to Butterfield. The three of 
them sat down and talked Commodore. As they 
parted, one of them said, "Why don't we do this 
again sometime?" 

And that was the first meeting of TPUG, the 
Toronto PET User Group. 


Simple Beginnings 
Though they didn't know it that Saturday after- 
noon, what those three men started would grow 
to.be one of the largest and most respected Com- 
modore user groups in the world. The single ele- 
ment that they had in common was a desire to 
learn more about the ins and outs of Commodore 
computers, and a willingness to share what they 
had learned with others. 

If you have wanted to start a user group but 
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hesitated because of the enormity of the task, it 
may be because you're looking at the huge groups 
that have evolved over months or years, like TPUG 
with more than 13,000 members. There are 
thousands of programs in its public domain soft- 
ware library and an annual convention in Toronto 
that attracts people from all over the world. A 
full-time staff runs the group's office. 

Large, successful user groups don't just 
materialize. Most of them start with a handful of 
individuals who want to learn more about an ex- 
citing hobby. 


“1 Wanted Company" 

Frank Topping bought a VIC-20 in December, 
1982. Retired, he lives in Englewood, Florida, a 
community of about 20,000 people. An amateur 
radio operator with several friends who owned 
computers, he looked around to see if there was a 
user group in the area. 

“T wanted company," says Topping. “Com- 
puting is lonesome without other computer hob- 
byists." Finding no established group close 
enough to join, he decided that, with a little initial 
organization on his part, the Commodore owners 
in Englewood could have their own group. 

Topping contacted the local media to see if 
he could get some publicity for the group's or- 
ganizational meeting. Four newspapers wrote 
articles about his efforts, and the station manager 
of WENG-AM in Englewood interviewed him on 
the air one morning. 

"It was very successful," says Topping. “T 
got lots of phone calls, and 14 people came to the 
organizational meeting at my home." It soon be- 
came evident that Topping's home wasn't big 
enough for group meetings, so they contacted a 
local savings and loan who let them use a meeting 
room free of charge. "Bits & Bytes," the Computer 
User Group of Englewood, Florida, that Frank 
Topping started, has more than tripled in size 
since that first meeting. 


ЕСМ: The Filing, Cataloging 
and Mailing List Program 
that does everything. 


СМ, formerly 15 


Resource Library. Thousands of public domain 
programs are available through individuals, other 
user groups, bulletin boards, and Commodore 
itself. You can appoint a librarian to take charge 
of this, someone who will copy disks for group 
members. People could bring new disks to the 
meeting and request copies, or the user group 
could purchase disks in bulk and charge a small 
fee for the disk and the librarian's time. Remember 
that it is illegal to copy anything but public domain 
programs. 

Books and magazines may also be a part of 
this library, as well as newsletters from other user 
groups. Again, be aware of copyright laws. It is 
illegal to type in a program from a copyrighted 
publication that you have not purchased, just as 
itis to get a copy of such a program on tape or 
disk. By buying a computer book or magazine, 
you are buying the right to copy the software con- 
tained therein for your use only. 

Bulletin Board Systems. Most Commodore 
BBS's were born out of user groups. They can be 
expensive to maintain and troublesome to keep 
running, but the shared information and new 
knowledge they can provide Commodore users is 
the reward. 

Subgroups. If there are enough members with 
special interests, you could break into subgroups 
for a portion of the meeting, or even hold sepa- 
rate meetings—a word processing workshop, 


ou to learn, 


matic Weather Station) com- 
bines a quality weather sensor 
with software to let you track 
weather conditions inside or 
outside your home. HAWS moni- 
tors weather data including dew 
point, temperature, humidity, 
and atmospheric pressure; plots 
historical data and graphically 
displays weather trends; deter- 
mines the comfort and chill fac- 
tors to help you dress; HAWS 
even forecasts the weather and 
compares your predictions to 
the local weatherman's. 
HAWS uses the same sensor 
employed by weather services in 
60 countries worldwide. The 
HAWS package costs only 
$199.95 and includes the sensor, 
cassette or floppy disc program, 
15-foot cable with connector for 
the computer, and a complete 
user's manual. 
Send today or call toll free to 
order your HAWS package. 


struggling through machine language, or maybe 
just a VIC-20 and a Commodore 64 group meeting 
separately. 

Discounts. Buying certain items in bulk, such 
as blank diskettes, often greatly reduces individual 
cost. Also, local computer dealers and retailers 
are often willing to offer discounts to user group 
members. This benefits not only the group, but 
also increases business for the dealer. 


Only A Framework 


The suggestions presented here are just that: sug- 
gestions. Each of the hundreds of Commodore 
user groups around the world has its own unique 
history. Let yours evolve. Try to get as many 
people actively involved as you can. Everyone 
has something to bring to the group. 

If you really run into trouble with the logistics 
of getting a group off the ground, it might be 
worth a long-distance phone call to a successful 
user group to find out how they solved similar 
problems. 


And try not to get too bogged down in or- 
ganization. Once your group reaches a certain 
size, more of it will be necessary, but keep your 
purpose in mind. You're a group of Commodore 
users spending some time together to enhance 
your own computer knowledge and share what 
you've learned with others. @ 


Vic 20™ or Commodore 64" а и 
This exciting, new 


Ordering Information 
Send $199.95 in check or money order payable to 
Vaisala, Inc. Include name, address, telephone num- 
ber,your computer model (VIC 20 ог Commodore 64), 
and program preference (tape cassette orfloppy disc). 
Orcall toll free to place your order. 
Major credit cards accepted. 
Dealer inquiries invited. 


1-800-227-3800 ex. HAWS 


VIC 20 and Commodore 64 are trademarks of Commodore Electronics Ltd. 


nitor, and md 


More than a to lame, 
HAWS provides. t oppor- 
tunity to use your computer as a 
data sampler and data analysis 
System for meteorology, allow- 
ing the user to interact with 
incoming data to monitor and 
forecast weather conditions. 
HAWS includes an instructive 
software program and a com- 
plete user's manual that teaches 
meteorological terms and equa- 
tions to allow anyone to quickly 
grasp weather concepts either at 
home or in the classroom. Sim- 
ple plug-in components and 
easy hookup also means you 
can free up your computer at 
any time for other duties. HAWS 
is a great educational tool for 
anyone. Order today. 


arn/Teach PT 


VAISALA INC. 
2 TOWER OFFICE PARK 
WOBURN, МА 01801 


ONI SNOILVINWIS 2IDJ31VHIS 
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A Guide To 


Commodore User Groups 


Here is the second half of the list of Commo- 
dore user ps that began in last month's 
GAZETTE. If you are a new Commodore owner 
looking for some support and assistance, you 
may want to attend a meeting in your area. 


If you send a written request for information from 


NEBRASKA 


Greater Omaha Commodore 64 
User Group 

Bob Quisenbe 

2932 Leawood Dr. 

Omaha, NE 68123 

402/292-2753 


Omaha VIC-20 User Group 
Bob Rowe 

1418 St. Raphael St. 
Bellevue, 68005 
402/292-3961 


The National VIC-20 User Group 
George E Kaywood 

PO. Box 34575 

Omaha, NE 68134 


NEW HAMPSHIRE 


C-64 User Software Exchange 
Resources (U.S.E.R.S.) 

Paul E. Kyle 

PO. Box 4022 

Rochester, NH 03867 


Southern New Hampshire VIC-20 
User Club 

Don Osterman 

PO. Box 7067 

Nashua, NH 03060 

603/888-0959 


TBH VIC NICS 
J. Newman 

PO. Box 981 
Salem, NH 03079 


NEW JERSEY 


ACGNJ PET/VIC/CBM User 
Group 
. Рука 


Joseph 
30 Riverview Terrace 
Belle Mead, NJ 08502 
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Part 2 


Kathy Yakal, Editorial Assistant 


a user group, please enclose a self-addressed, 
stamped envelope. 

Additions, deletions, and corrections to this 
list should be addressed to: 


COMPUTE! Publications 
P.O. Box 5406 


Greensboro, NC 27403 


Commodore Friendly User Group 
Rich Pinto 

49 Hershey Rd. 

Wayne, N 

201/696-8043 


Commodore-64 Users Group 
Thomas Martin 

680 Leigh Terrace 

Westwood, NJ 07675 
201/664-3304 


Computer Club of Ocean County 
Flavio L. Komuves 

1170 Old Freehold Rd. 

Toms River, NJ 08753 
201/341-3797 

BBS 201/244-2259 


Northwest Bergen VIC Users 


Group 

Arnold Wiesenfeld 
221 Wayfield Cr. 
Wyckoff, NJ 07481 
201/891-5196 


South Jersey Commodore 
Computer User Group 

Mark Orthner 

46B Monroe Path 

Maple Shade, NJ 08052 

609/667-9758 


VIC Software Development Club 
H. P Rosenberg 

77 Fomalhaut Áve. 

Sewell, NJ 08080 


VIC Times 
Thomas R. Molnar 
46 Wayne S. 
Edison, NJ 08817 


NEW MEXICO 


New Mexico Commodore User 
Group 

Danny or Betsy Byrne 

6212 Karlson N.E 

Albuquerque, NM 87113 

505/821-58 2 


attn: Commodore User Groups 


NEW YORK 


Adirondack Commodore 64 User 
Group 

Paul Klompas, c/o Ray Su; py 

Upper Glen St. PO. Box 7 

Glen Falls, NY 12801 


Brentwood-Bayshore VIC/64 
Users Club 

Serafin R. Vargas 

Brentwood Public Lib. Second 
Ave. & Fourth St. 

Brentwood, NY 11717 

516/273-7883 


Broome County C-64 Users Group 
Richard Sher 

31-S Jane Lacy Dr. 

Endicott, NY 10760 

607/754-7382 


Capitol District Commodore 64/ 
VIC-20 User Group 

William Pizer 

363 Hamilton St. 

Albany, NY 12210 

518/436-1190 


Commodore Computer Users 
Group of Ithaca 

Max Paperno 

519 E. State St. 

Ithaca, NY 14850 

607/277-3981 


COMMODORE SIG Computer 
Club of Rockland 

Peter Bellin 

PO. Box 233 

Tallman, NY 10982 

914/357-8941 


Commodore User Group of 
Rochester 

Thomas A. Werenski 

78 Hardison Rd. 

Rochester, NY 14617 


TM 
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Taxpack T" 
Powerful income tax computing 
software specially designed for 
the Commodore VIC 20. 


= 
< 


Now you can use your Commodore 
VIC 20 to perform all the 
calculations on your Canadian T1 
general tax form. ТахрасК guides 
you easily through every aspect of 
the form with friendly prompts and 
a comprehensive instruction 
manual. This new software is 
available on cassette tape and will 
run on the standard 3.5k memory 
in your Commodore VIC 20 home 
computer.* 

Taxpack lets you tackle your income 
tax form at your own pace. À 
convenient save-and-restore 
function lets you record and review 
historical results. Professional 
editing features assure easy and 
accurate data entry. Taxpack puts 
the power of tax modelling and 
planning for subsequent years in 
your hands, today. 


“Тһе cassette also includes an expanded version of 
Taxpack with enhanced display features, for the 
Commodore VIC 20's with 8k+ memory expansion. 


I designed Taxpack so 
you could do something 
really practical with your 
Commodore VIC 20. 


Peter Lambert, MBA 
Vice-President, 
Product Development 
Cosmopolitan Software 


Many happy returns 

Because you can calculate and 
preview more tax scenarios with 
Taxpack than you'd have the 
patience or the time to do manually, 
this software can help you save tax 
dollars. Custom-tailored to the 
Canadian T1 general form, Taxpack 
will be updated every year to reflect 
changes in the government's income 
tax regulations. Innovative program. 
design allows us to update Taxpack 
within days of the new Т175 
availability. 


So easy to order 

To use your Visa or Mastercard, 
phone us toll free; or, send your 
cheque or money order with the 
handy mail-order form attached. 
We'll confirm your order by return 
mail. Your up-to-date Taxpack 
cassette and manual will be shipped 
within 15 days of the release of the 
1983 T1 general form. 


атбас ei 
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Satisfaction Guaranteed 
We guarantee that you will find 

бе es waune em Ба Taxpack an excellent software value. 
To order with Visa-or' Mastercard =з If you are not totally satisfied, drop 
call us toll-free: us a note to say why, and return the 
product post paid to us within 10 
days for a full refund of the 


(from B.C., call 112-800-268-6364) purchase price. 


Please send me 


Taxpacks @ $29.95 $ 


Nova Scotia residents only, add 10% Sales Tax +$ 

Add $2 per unit shipping and handling charges +$ 
Total $ 

My Name 

Address 

City Province 

Postal Code Telephone 

Make Cheque or Money Order payable to: 

Cosmopolitan Software Services Limited 

and mail with this order form to: 

Box 953, Dartmouth, Nova Scotia В2Ү 3Z6 Attn: Order Desk 


Commodore User Group of 
Westchester 

Ben Weyer 

P.O. Box 1280 

White Plains, NY 10602 


Folklife Terminal Club 
John Krebs 

PO. Box 2222-R 

Mt. Vernon, NY 10551 


Hudson Valley Commodore Club 
John G. Ro, 

1 Corwin PI. 

Lake Katrine, NY 12449 
914/246-8936 


HV Commodore Club 
Rusty Staub 

35 Old Route 299 
New Paltz, NY 12561 
914/255-6267 


igcomp (Commodore User 
roup) 

Dr. Lewis Levitt 

1250 Ocean Ave. 

Brooklyn, NY 11230 
212/859-3030 


L.I.VLC.S. 

Eric Dusansky 

3 Blueberry Ridge Rd. 
Setauket, NY 11733 


National VIC Association 
Michael Kleinert 

9 Crabapple Ln. 

Nanuet, 10954 
914/623-8929 

BBS 623-4248 


New York 64 User Group 
Bruce D. Cohen 

222 Thompson St. 

New York, NY 10012 
212/673-7241 


New York Commodore User 
Group (NYCUG) 

Ben Tunkelan; 

380 Riverside Dr. 7Q 

New York, NY 10025 


North Country Computer Club 
Don Taber 

RD 1, Box 153B 

Ogdensburg, NY 13669 
315/393-46 


Schenectady Commodore User 


Grow 
Timoth: T. Davis 
The Video Connection, 
Canal Square 
Schenectady, NY 12305 


Superstar's User Group 
Jean E Coppola 

151-28 22nd Ave. 
Whitestone, NY 11357 


Utica Commodore User Group 
Phil Rothstein 

1801 Storrs Ave. 

Utica, NY 13503 

315/733-2244 


VIC-20 Commodore 64 User 
Стоц 

Pete Lobl 

31 Maple Dr. 

Lindenhurst, NY 11757 

516/957-1512 


VIC User Group 

Robert Wurtzel 

%Stony BrookLearning Center 
1424 Stony Brook Rd. 

Stony Brook, NY 11790 
516/751-1719 


NEW ZEALAND 


Nelson VIC User Group 
Peter Archer 

PO. Box 860 

Nelson, New Zealand 
54/79362 


NORTH CAROLINA 


Amateur Radio PET User Group 
Hank Roth 

РО. Box 30694 

Raleigh, NC 27622 


Commodore 64 Research Triangle 
User Group 

Doug Latta 

670A Glendower Rd. 

Raleigh, NC 27612 

919/787-5748 


Commodore User Group, c/o 
Talton's Select Business 


Equipment 
Tom dtidham 
PO. Box 749 
Durham, NC 27702 
919/489-4155 


Microcomputer User Group 
Joel D. Brown 

Rt. 1, Box 134A 

Boonville, NC 27011 


Raleigh VIC-20 User Group 


[әп епег 
410-D Delta Ct. 


Cary, NC 27511 
919/469-3862 


Triad Amateur Computer Society/ 
Commodore User Group 

Dave Hill 

PO. Box 7073 

Greensboro, NC 27407 

919/275-8014 


Triad C:64 User's Group 
Gregg Péele 

PO. Box 5406 
Greensboro, NC 27403 
919/275-9809 


Triangle Amateur Computer Club 
Russ Гуда! 

PO. Box 17523 

Raleigh, NC 27619 

919/787-4137 


Тгуоп Commodore 64 Club 
Robin Michael 

PO. Box 1016 

Тгуоп, NC 28782 
704/859-6340 


УІС-20 User Group 
David C. Fortenberry 
Rt. 3, Box 351 
Lincolnton, NC 28092 
704/732-0932 


VIC-20 & 64 Group 
Tim Gromlovits 

Rt. 11 Box 686E 
Hickory, NC 28601 
704/495-7922 


NORWAY 


VIC Club of Norway 
Rolf Ober; 

Liljegt. 4 1750 Halden 
Norway 


OHIO 


Akron Area Commodore User 
Group 

Patrick Papania 

Rm. B-201, 80 W. Bowery 

Akron, OH 44308 


CLERCOM 64 

Tim Sander 

5771 Observation Ct. 
Milford, OH 45150 
513/831-5684 


Commodore Computer Club of 
Toledo 

Gerald W. Carter 

734 Donna Dr. 

Temperance, MI 48182 

313/847-0426 


Commodore User Group 
Carl Skala 

18813 Harlan Dr. 

Maple Heights, OH 44137 
216 581-2099 


CPU Connection (Commodore 
Preference Users) 

Bill 

PO. Box 42032 

Cleveland, OH 44142 

216/696-5093 


Dayton Area Commodore User 
Grou 

Bernie Worby 

4154 Tareyton Dr. 

Bellbrook, OH 45305 

513/848-2065 


Licking County 64 User Group 
323 Schuler St. 

Newark, OH 43055 
614/345-1327 


N.E. OHIO and N.W.PA. 
Commodore Users Group 

Wes Boyd 

PO. Box 875 

Youngstown, OH 44501 


Northeast Ohio Commodore User 
Group 


Di 
SSL W. Ridge Ra. 
Elyri 35 


, OH 
216/322-7184 


Northeast Ohio Commodore User 
Group (NEOCUG) 

Dennis Sutter 

c/o Computer Corner 

5104 Mayfield Rd. 

Lyndhurst, OH 44124 


The Cincinnati Commodore 
Computer Connection 

Ted Stalets 

816 Beecher St. 

Cincinnati, OH 45206 

513/961-6582 


OKLAHOMA 


Commodore Hobby User Group 
c/oTulsa Computer Society 

PO. Box 1133 

Tulsa, OK 74101 


Commodore Users 
Monte Maker 

PO. Box 268 

Oklahoma City, OK 73101 


Southwest Oklahoma Computer 
Club (S.W.O.C.C.) 

c/o Commodore Chapter 

PO. Box 6646 

Lawton, OK 73505 


OREGON 


Albany Corvallis С:64 User 
Group 

Al Rasmus 

2138 Chicago S.E. 

Albany, OR 97321 

503/967-8701 


Amateur Radio Group 
Jim Meyers 

PO. Box 626 

Molalla, OR 97038 
503/239-8888 


Astoria Commodore User Group 
Kent Poulsen 

Rt. 3, Box 75 

Astoria, OR 97103 

503/325-5685 


Beaverton 64 User Group 
Jack Simpson 

11855 S.W. Ridgeview Terrace 
Beaverton, OR 97005 
503/646-9596 


Central Oregon VIC/64 Users 
е 

499 N. Harwood Ave. 

Pineville, OR 97754 

503/447-7062 


East Portland VIC User Group 
Terry Schultz 
503/665-6880 


Fire 10 VIC User Group 
Harley Cissna 

1927 S.E. 174th 
Portland, OR 97233 
503/668-6520 


Forest Grove Commodore Users 
Don Singer 
503/357-4140 


Gresham VIC/64 User Group 
Bob Brown 

625 N.W. Battagli. 

Gresham, OR 97030 
503/666-4131 


Lake Oswego PET/C64 User 
Group 

John Jones 

2134 N.E. 45th 

Portland, OR 97213 

503/281-4908 ` 


Lane County User Group 

Peter Rocksvold 

584 Sierra 

Eugene, OR 97402 
/688-1532 


Mt. Hood Community College 
PET/64 Users 

Ted Scheinman 

4044 N.E. Couch 

Portland, OR 97232 

503/667-7196 


N.E. Portland VIC User Group 
Jerry Adams 

5014 N. Montana 

Portland, OR 97217 
503/287-1433 


N/NE Portland VIC Users 
Mike Heal 

PO. Box 17405 

Portland, OR 97217 
503/283-5996 


North/Northeast Commodore 
User Group 

Mike Daigle 

PO. Box 17580 

Portland, OR 97217 

503/289-5179 


Oregon Commodore Computer 
User Group (OCCUG) 

John E Jones 

2134 N.E. 45th Ave. 

Portland, OR 97213 

503/281-4908 


Pacific Northwest Commodore 
User Grouj 

Richard Tsukiji 

PO. Box 2310 

Roseburg, OR 97470 

503/672-7591 


PGE Commodore User Group 
Richard Turnock 

121 S.W. Salmon St. 

Portland, OR 97204 
503/220-3139 


Pórtland Airbase Officers Club 
(VIC and 64) 

Frank Chase 

PO. Box 17511 

Portland, OR 97217 

503/289-4331 

(after 9:30 PM) 


S.E. Metro Commodore User 
Group (SEMCUG) 

John Lampert 

PO. Box 42082 

Portland, OR 97242 

503/775-4232 


Salem 64 User Group 
Bud Rasmussen 

3795 Saxon Dr. S. 
Salem, OR 97302 
503/585-1515 


Salem Pacific Northwestern Bell 
VIC User Group 

Bill Black 

PO. Box 106 Room 452 

Salem, OR 97308 

503/399-4850 


Salem VIC User Group 
John Ingram 
503/370-8775 


Southern Oregon Commodore 
User Group 

Guy Stan; 

2300 Dutcher Creek Rd. 

Grants Pass, OR 97527 


Southern Oregon VIC-20 C-64 
User Group 

James Powell 

3600 Madrona Ln. 

Medford, OR 97501 

503/779-7631 


Tillamook VIC/C64 User Group 
George Shiveley 

1009 5th St. 

Tillamook, OR 97141 
503/842-4515 


Tektronics Employees VIC Users 
Rick Simonsen 
503/639-5451 


United States Commodore Users 
Стоц 

РО. Вох 2310 

Roseburg, ОК 97470 


Vancouver Commodore User 
Group 

Chris Brown 

503/573-8489 


Yamhill County Commodore User 
Group 

Dan Linscheid 

Rt. 2 Box 246 

Sheridan, OR 97378 

503/843-2625 


PENNSYLVANIA 


Capitol Area Commodore Club 
George Crist 

3410 Cloverfield Rd. 
Harrisburg, PA 17109 
717/652-8479 


Commodore User Group 
Donald Moyer 

252 Makefield Rd. 
Morrisville, PA 19067 


COMPSTARS 
Mike Norm 

130 Blue Teel Circle 
Audubon, PA 19403 


Erie County Commodore Users’ 
Group 

Robert T. Glenn 

142 Forest St. 

Cambridge Springs, PA 16403 

814/398-8146 


Main Line Commodore User 
Group (MLCUG) 

Emil Volcheck 

1046 General Allen Ln. 

West Chester, PA 19380 

215/388-1581 


Naval Air Development Center 
Commodore User Club 

Alan Blumenthal 

912 Fraser Rd. 

Erdenkeir, PA 19118 

215/441-2580 


PACS CBM User Group 
Ron Kushnier 

20th & Olney Sts. 
Philadelphia, PA 19141 
215/951-1267 


Pittsb Commodore Group 
Joel A. Casar 

2015 Garrick Dr. 

Pittsburgh, PA 15235 


VIC Software Development Club 
Tracy Lee Thomas 

440 W. Sedgwick Apt. A-1 
Philadelphia, PA 19119 

215/ 28 


Westmoreland Commodore User 
Club 

Jim Mathers 

3021 Ben Venue Dr. 

Greensburg, PA 15601 

412/836-2224 


PUERTO RICO 


Commodore User Group of 
Puerto Rico 

Ken Burch 

RFD #1 Box 13 

San Juan, Puerto Rico 00914 

809/791-5840 (no calls before noon) 

BBS 781-0350 (8 p.m.-8 a.m.) 


RHODE ISLAND 


Narragansett Commodore Users 
Group, c/o EPA 
Environmental Research Lab 

Robert R. Payne 

South Ferry Road 

Narragansett, RI 02882 


Newport Computer Club 
Dr. Matt McConeghy 

10 Maitland Ct. 
Newport, RI 02840 
401/849-2684 


SOUTH CAROLINA 


Beaufort Technical College User 
Grou 

Dean of Ínstruction 

PO. Box 1288 

Beaufort, SC 29902 

803/524-3380 


Commodore Computer Club of 
Columbia 

Buster White 

318 Quincannon Dr. 

Columbia, SC 29210 

803/772-0305 


SOUTH DAKOTA 


Sioux Falls User Group 
Brandon Ulrich 

4200 S. Louise Suite 304 
Sioux Falls, SD 57105 
605/334-1059 

Doug Jones 


VIC-64 User Club 


Pierre, SD 57501 
605/224-4863 


TENNESSEE 


Chattanooga Commodore User 
Caralyn llah 

al 
PO. Box 1406 
Chattanooga, TN 37401 
615/875-6676 
Metro Computer Center 


Memphis Commodore User Club 
H: Ewart 

2476 Redvers Ave. 

Memphis, TN 38127 

901/358-5823 


Metro Knoxville 64 User Group 
Ed Pritchard 

7405 Oxmoor Rd. Rt. #20 
Knoxville, TN 37921 
615/938-3773 


Nashville Commodore User 
Group 

Dave Rushin; 

PO. Box 121282 

Nashville, TN 37212 

615/331-5408 


TEXAS 


Commodore (Houston) User 
Group (CHUG) 

Mary and John Howe 

23502 Creekview Dr. 

Spring, TX 77379 

713/3700 

64 User's Group 

Stan Grodin 

2421 Midnight Circle 

Plano, TX 75075 

Mid-City Commodore User 
Grow 

413 Chisholm Tr. 

Hurst, TX 76053 


PET User Group 
Jim Dallas 

14311 River Glen Dr. 
Sugarland, TX 77478 


Southeast Houston VIC User 


Grow 
11423 Kirk Valley Dr. 
Houston, TX 77089 
713/481-6653 


VIC User Group 
Robert Massengale 
3817 64th Dr. 
Lubbock, TX 79413 


UTAH 


Central Utah Commodore Users 
(CUCU) 

Steve Graham 

1339 W. 1100 N. 

Pleasant Grove, UT 84062 

801/785-7118 


The Utah Commodore 64 and 
VIC-20 User Group 

Rodney Keller 

652 W. 700 N. 

Clearfield, UT 84015 

801/776-3950 


VIC LICK 

David Pignar 

% Mountain Computer Society 
PO. Box 1154 

Sandy, UT 84091 

801/261-0119 


VIRGINIA 


Capitol Area PET Enthusiasts 
(C-64) 

William Tyler 

607 Abbotts Ln. 

Falls Church, VA 22046 


Central Virginia User Group 
Dale Wee | 

Rt. 3 Box 451 

Hurt, VA 24563 


Fredericksburg Area Computer 
Enthusiasts 

Michael Parker 

PO. Box 324 

Locust Grove, VA 22508 


Lynchburg User Group 
Dick Rossi iol 

Rt. 2, Box 180 
Lynchburg, VA 24501 


Roanoke Area Computer 
Enthusiasts 

Larry Rackow 

4726 Horseman Dr. 

Roanoke, VA 24019 

703/362-8960 


Southwestern Virginia 
Commodore Users 

Jimmy Richardson 

Rt. 1, Box 12A 

Elk Creek, VA 24326 

703/655-4144 


Tidewater Commodore User 
Group 

Fred Monson 

4917 West Grove Rd. 

Virginia Beach, VA 23455 


VIC-20 & CBM 64 User Club 
Donnie L. Thompson 

1502 Harvard Rd. 
Richmond, VA 23226 
804/288-4962 


Washington Area Commodore 
User Group 

Richard Jackson 

PO. Box 93 

Mount Vernon, VA 22121 

703/360-7677 


WASHINGTON 
CBM 64 Business & Utility User 


Group 
Khamsing S., c/o Softechnics 
3212 Beacon Ave. 
Seattle, WA 98144 
206/723-4980 


CBM Users Group 
Rick Beaber 

803 Euclid Way 
Centralia, WA 98531 


Club 64 

Hal Scheidt 

6735 Tracyton Blvd. NW 
Bremerton, WA 98310 
602/692-8295 


Commodore Computer Club 
Donald H. Sims 

PO. Box 1471 

Oak Harbor, WA 98277 
206/675-0301 


Commodore Users of Tacoma 
Marwan Samman 

1734 Fernside Dr. S. 

Tacoma, WA 98465 
206/565-5023 


COMPUTER Club, c/o 
Honeywell Inc. 

John Goddard 

5303 Shilshole Ave. NW 

Seattle, WA 98107 

206/789-2000 


Edmonds Commodore User 
Group 

Rick Ellis 

23404 74th W. 

Edmonds, WA 98020 

206/776-3539 


Longview Commodore User 
тоц] 

Stephen Jones 

626 26th Ave. 

Longview, WA 98632 

206/577-8317 


NW Commodore User Group 
Richard Ball 

2565 Dexter N. #203 

Seattle, WA 98109 
206/284-9417 

BBS 743-6021 


PSACE 

Ken Ton 

1800 Taylor Ave. N. 
Seattle, WA 98109 


Seattle Commodore 64 User 
Group 

Dr. Allen M. Gown 

Dept of Pathology SM-30, 

Univ. of Wash. 

Seattle, WA 98195 


Spokane Commodore User Group 
Terry and Sara Voss 


W. 1918 Boone Ave. 
Spokane, WA 99201 
/327-7202. 


World Wide User Group (Military 
Personnel Only) 

R. Smith 

РО. Box 98682 

Tacoma, WA 98498 

206/535-0336 


WASHINGTON D.C. 


USO Computer Club 
USO Outreach Center 
Steven J. Guenther 
207 Beyer Rd. SW 
Washington, DC 20332 


WEST GERMANY 


VIC-20/64 Games Exchange 
Michael Block 
Breukerskamp 35 

D-5750, Menden2 

West Germany 


WEST VIRGINIA 


Tri-State Commodore Users 
Marc Hutton 

73 Pine Hill Estates 
Kenova, WV 25530 
304/453-2124 


WISCONSIN 


Commodore and VIC Enthusiasts 
(C. A.V E.) 

Mike Shaffer 

РО. Box 33 

Crivitz, WI 54114 

715/854-2269 


Commodore 64 and VIC-20 
Software Exchange Group 

E.J. Rosenberg 

РО. Box 224 

Oregon, WI 53575 

608/835-5538 


Commodore Lovers Users Bunch 
VIC-20 and C-64 (C.L.U.B. 84) 

Roger Christensen 

РО. Box 72 

Caledonia, WI 

414/632-6922 


UNCLE! has a calculator-type scratch pad. Yo! 
can't fool your UNCLE! if you enter an error, 
ed. When you're through conversing 
with UNCLE! on your Commodore 64 (single 
drive), simply feed the forms and schedules 
into a 16-17 cpi printer and UNCLE! will prepare 
: ıı every one of them. How much to put UNCLE! 
7% іп your Commodore? $64! А 


will be fl 


Commodore Users of Systems, 
Software and Hardware 
(C.U.S.S.H.) 

Tim Tremmel 

3614 Sovereign Dr. 

Racine, WI 5: 

414/554-0156 

BBS 554-9520 


Eau Claire Area CBM 64 User 
Grou 

John E Slavs! 

Rt. 5 Box 179. 

Eau Claire, WI 54701 

715/874-5972 


Madison Area Commodore User 
Group 

John Carvin 

1552 Park St. 

Middleton, WI 53562. 

608/831-4852. 


Milwaukee Area Commodore 64 
Enthusiasts (M.A.C.E.) 

Kevin D. Wilde 

PO. Box 340 

Elm Grove, WI 53122 

414/259-5991 


S.W.LT.C.H. 

Len Lutz 

W156 N8834 Pilgrim Rd. 
Menomonee Falls, WI 53051 
414/255-7044. 


Waukesha Area УІС Enthusiasts 
(WAVE) 

PO. Box 0641 

Waukesha, W153187-0641 @ 


VARANGER Computing. 180 Grand Avenue, 
Suite 900, Oakland, CA 94612 
Telephone (415) 482-3861 


ОШО? Calif. Res. add 6(/2)% Sales Tax. Visa/MasterCard accepted. 
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Nevets 


Steven R. McCloskey 


A clever action game, “Nevets” requires both 
strategy and a lot of dexterity with your joy- 
stick. Using character graphics, it is written 
for the unexpanded VIC. We've added a ver- 
sion for the 64. 


In “Nevets,” you are transported to the Land of 
Adnerb, where your mission is to protect four 
power capsules against the ever encroaching 
Nevets. Your only defense against the thieving 
Nevets is a turret gun, which you control with 
your joystick. 

The screen displays a lower and an upper 
level, with two power capsules at the center of 
each level. The Nevets may approach from right 
or left on either level. The turret, at the bottom 
center of the screen, can be moved up and down 
with the joystick, and the gun can be aimed by 
moving the joystick left and right. Pressing the 
fire button fires the gun. 

There are 40 levels of play. You must destroy 
your quota of Nevets (displayed on the screen) 
within 60 seconds to get to the next higher level. 
When you meet the quota, you receive a bonus— 


One power pod has already been stolen. The player is about 
to eliminate one of the thieving Nevets in the VIC version. 
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the time remaining times ten. 

The game ends when time runs out or all 
four power capsules have been stolen. You then 
have the option of playing again. The game also 
keeps track of high score. 


VIC Program Structure 


Here's the VIC version program structure for those 
interested in how the program was written: 


Lines 
5-70 Title and graphics 
75-90 Screen setup 


110-160 Joystick reading routine 
165-190 Variable setup 

200-330 Main program loop 

400—410 Fire subroutine 

500-510 Game over subroutine 
600—610 Nevet #2 subroutine 

700-710 Nevet #1 subroutine 
800-840 Nevet #2 variable subroutine 
900-940 Nevet #1 variable subroutine 
950-960 Power capsule subroutine 


See program listings on page 143. 


getting too close (64 version). @ 


What do voice 
synthesizers have 
in common with 
movies? 
They don't make 
them like they 
used to. 
Because now 
there is S.A.M. The 
Software Automatic Mouth” 
The first software-only speech 
synthesizer for Commodore 64, 
Atari and Apple computers. 
Developed by Mark Barton 
of Don't Ask Software, S.A.M. 
is designed to give you all 
the power of conventional 


hardware speech 
devices. Without 
the hardware. 

And without the 
high price. 

S.A.M. is the 
program that 
makes other pro- 
grams talk. Busi- 

ness programs. Educational 
programs. Recreational pro- 
grams, too. 

You can use it in any num- 
ber of useful ways. 

To write instructions that talk. 
Stories that tell themselves. 
And creative new games with 


characters that converse or 
opponents that crack jokes. 

And you can do it all with 
ease. With phonetic or plain 
English input. 

S.A.M. can say anything you 
like, any way you like— you 
choose the pitch, tone, speed 
and inflection. 

If you want, you can even 
choose the voice. 

Here's talking to you, kid. 
(The Apple version includes an 
8-bit digital-to-analog converter 
and audio amplifier on a card. 
It requires 48K and a speaker. 
The Atari version requires 32K.) 


Say it again, S. A.M. 


/ 
el 


| [me 


zee, | 
red trademark of Ap| 


Bingo 64 


Richord L. Witkover 


“Bingo 64” 15 а cleverly written computer ver- 
sion of the classic game. It makes good use of 
the 645 graphics and sound capabilities to pro- 
vide you and three friends with many exciting 
games of bingo. À joystick is required. 
mia) 


Few people have not known the anticipation, 
heard the click of the balls, the call of the number, 
and finally, the excited shout of "Bingo!" Here's a 
four-player version of this world-famous game 
written for the Commodore 64. 


Setting Up The Game 
Before you begin playing, you have to choose 
your mode of play from a menu. Manual ball feed 
allows you to control the pace of the game. If you 
opt for auto ball feed, the computer automatically 
picks the next number. Choose manual cover if 
you want to cover the spots on your card yourself 
(using the joystick). If you want your 64 to cover 
the spots, pick auto cover. 

After you make your choices, four blank cards 
are displayed on the screen. Each column on a 
card corresponds to one letter of the word BINGO. 
The five numbers in each column are selected 
from 15 possible values and are checked to prevent 
duplication. This process is repeated for all four 
cards. The selected numbers are displayed on the 
cards and stored in the three-dimensional array 
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C%. A cover token is then placed over the free 
box in the center, giving it the status of a called 
number. 


Ready To Play 


The cards are on the screen, and you are ready to 
begin playing. At the bottom of the screen are 
five balls (sprites), each labeled with a letter in the 
word BINGO. 

Numbers are selected through a random 
graphics routine. The lettered balls jump up and 
down like kernels of popcorn. The height a ball 
reaches is random. If it jumps above a line on the 
screen, it is selected. If not, it falls back with a 
plop, and another ball is given a chance. 

After the column letter has been selected, a 
random number is chosen. To prevent duplica- 
tion, all called numbers are entered in the two- 
dimensional array N?o. The newly selected 
number is compared to the numbers in the array. 
If a match occurs, the number is discarded and 
another one generated. When a unique number is 
found, it is printed on the enlarged sprite in the 
middle of the screen, along with its letter. 


Checking For A Match 


Next, each number in the appropriate column on 
each card is checked for a match. A chime sound 
signifies a match. If the number doesn't appear 
on any of the four cards, a sour bong sounds. 


| ! Cap 


The world may be short of oil. And short of jobs. But theres no shortage of entertainment. 
Arcades. Movies. Amusement parks. TV. Concerts. Records. You've got your choice. And every day, 
more of you are choosing HesWare™ computer games. : ү ; 
That's because only the best games earn the HesWare title. Tough, challenging, arcade quality 
action E arorunner RE БЕ Bapang Robot Panic?" 
ind-bending strategy and role playing adventures 
like Pharaoh's Curse" and Oubliette:" i Pleases the 
Zany new titles that have to be seen to be believed. tou 
Would you believe Attack of the Mutant Camels"?? ` Lie. 
You don't need an expensive computer to ШШ customer 
ее aclion, eae HesWare кр 2р sl Е in 
on cartridge, diskette or cassette for ү“ Commodore 641 
Atari? апа ІВМ personal computers. : HesWan B. i 
When you pick up а HesWare game, you know it's ready g 
for the toughest test of all: beating out the tough competition ^ Human Engineered Software 
for your attention. 2 ЫЕ 
HesWare games. Just one of the ways HesWare is 800-227-6703 
expanding the computer experience. Look for them at your ШОН 


а 5 7979) 
favorite software retailer. Dept. C20 

VIC 20 and Commodore 64 are trademarks of Commodore Electronics Ltd. Atari is a registered trademark of Atari, Inc. 

IBM PC is a registered trademark of International Business Machines. Pharaoh's Curse is a trademark of Synapse Software. 

Oubliette [аага of ISA Software. 


The computer calls the shots in “Bingo 64.” 


Variable Function 

А1-4 Parameters of pattern for winner scan 

AU Mode flag for ball feed and cover 

BO Bingo flag 

B0,1 Digits under joystick cursor 

C% Card numbers array 

CC,CM Joystick cursor position 

CD Card number 

CL Column number 

CO% Ball color array 

DU% Duration of notes array 

FB . Fire button switch 

FH%,FL% Music frequency high and low bytes 

FR Joystickrow number . 

HB High byte of screen color memory 

10-3 Joystick direction switches 

L Ballletterarray 

LN Length ofballnumber string 

N% Called numberarray 

NC Ball color index 

NM Called number 

NN No-number match flag 

NU Value of called number within column (1-15) 

N12 Digits of called number 

OB Reversed number flag (logical variable) 

PD Joystick memory register contents 

P1 Screen memory location of N1 

RN .  Rownumberoncard 

s Start of screen memory for cards 

SD% Sprite data аттау - 

SN Screen memory location of box digit 

ss Sound chip memory location; also, screen-to- 
color memory offset 

У Video chip memory location 

WI,WJ Indices of box to be checked for winner 
Memory location of box to be checked for winner 

WP Contents of WM. 

x __ Ball X-position array 

Y Ball Y-position array 

YM Maximum ball height 

2 Present Бох number value 


If you selected auto cover, the computer 
covers a matched number by printing it as a red 
reversed character. If you chose manual cover, 
you must use the joystick to position the marker 
and press the fire button to cover your number. If 
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you make a mistake, you lose the number. 

When a number is covered, the program 
checks the row, column, and diagonal for a bingo. 
Since the covered numbers have been printed in 
reversed character mode, this is easily done from 
screen memory. The program needs to check the 
five boxes to see if they all contain reversed char- 
acters (screen codes greater than 127). If a winner 
is found, the covers change color and music plays. 
Each card is checked for the possibility of multiple 
winners. 


One Machine Language 


Routine 
The first DATA line contains a short machine 
language routine which initializes screen color 
and sprite memory locations. The remaining 
DATA statements set up sprite data and music. 
The program contains extensive REMarks to make 
the logic flow easier to follow, and the variable 
names are listed below, with their functions. If 
you would like a copy of this program, send $3, a 
self-addressed, stamped envelope, and a blank 
cassette or 1541 diskette to: 

Richard L. Witkover 

P.O. Box 560 

Upton, NY 11973 


See program listing on page 157. @ 


Modem with Printer Interface for 
Atari* Commodore, and Vic 


the microperipheral corporation 


Direct connect, autodial, autoanswer modem, 
also runs a parallel printer. 300 baud modem has 
built in Centronics printer port. Simultaneously 
prints whatever appears on your screen as it 
comes over the telephone. 


One box does it all so you can receive the most 
from your computer. Terminal program supplied, 
complete and ready to run. 


Auto-Print Microconnection retails for $149.95. 
*|s not a replacement for Atari 850 Interface. 


(206) 881-7544 


You're а таа 
Irishman digging 
your way through 
an abandoned mine 
filled with oil, 

coal, gold, rubies, 
diamonds—and 

hungry creatures. 
You'll need the luck 
of the Irish to sur- 
vive, but with so 
much at stake, it’s 

a chance you're 
willing to take. 


Your screen ex- 
plodes with life- 
threatening action 
as you pilot your 
Moon Shuttle 
through outer space 
in this home version 
: of the Nichibutsu® 
Mf favorite. Awaiting you 
m is The Prince of Dark- 
ness and his forces, 
which mysteriously 
multiply! 


O'RILEY'S MINE" available for Atari®, 


Apple? and Commodore 64% 


MOONSHUTTLE" available for Atari? 
Radio Shack Color®, Commodore 
coming soon for Apple? 


One of the 
biggest arcade 
game hits from 
Konami is a game 
of fast action in 
life-and-death en- x T ie Seer 
counters. You battle a : қ В ; / 2Е 

pack of hungry wolves % 

eager to cotch your de- 
fenseless piglets. You'll 
need quick reflexes and 
а good orm in the new 
arcade hit from Datasoft. 


Balanced on the 
edge of disaster, you 
are the deadly King 
Scorpion defending 
your domain against 
fatally venomous 
spiders. Genesis cap- 
tures all the intensity 
of Design Labs’ 
arcade version of 
the first great 


Жара жос bottle оп eorth. 
POOYAN" available for Atari®, Radio 


Shack Color®, Apple®, coming soon for 
Commodore 64* 


Our reputation as one of the premier game manufacturers 
assures you of the highest quality attainable in action, strategy 
and graphics. For the hottest titles in entertainment, keep your eye on the leader—DATASOFT. 


You'll Find The Best шогу Computer Software 
rom / : 


GENESIS" available for Atari®, 
( Apple®, ІВМ-РСФ, and 
2 Commodore-64®. 


Рооуап” is a trademark of Konami Industries Company, Ltd. < | , h` 1 Moon Shuttle? is a registered trademark of Nichibutsu, USA. 
O'Riley's Mine? and Datasoft? are registered trademarks GENESIS" and Design Labs are trademarks of Design Labs. 
of Datasoft Inc. 


9421 Winnetka Avenue, Chatsworth, CA 91311 (213) 701-5161 SUAS SID ATASORIINGS 


Some Answers From Commodore: 


A Conversation 
With Myrddin Jones 


Selby Bateman, Assistant Editor, Features 
Tom Halfhill, Editor, COMPUTE!’s PC & PCjr Magazine 


Myrddin L. Jones is vice president of marketing for the 
Computer Systems Division of Commodore Business 
Machines, Inc. At the winter CES he spoke to COM- 
PUTE!'s GAZETTE about the пеш 264 line of computers, 
Commodore's continued support for the VIC-20 and 
64, and his perception of the changing needs of computer 
buyers. 

ie BE) 


GAZETTE: Now that the Commodore 264 line of 
computers has been introduced, how do you re- 
spond to 64 and VIC-20 users who may fear their 
computers will be given less attention? 


Jones: First of all, the 64 is one of the largest bases 
for third-party and Commodore software which 
has only just started. Most of our resources are 
currently dedicated to 64 software. And the trans- 
ition, as I understand it, from 64 to 264 software 
isn't that great. So I don't really see it being any 
threat to the availability for the 64. 

Ithink the Commodore 64 is such a well- 
used machine in education today—and our thrust 
is more and more toward productivity and 
educational-type software—that I don't think 
there will be any diminution of support for the 
64. We've already sold over a million of them in 
the U.S. We're way ahead of our schedule, so I 
don't think you'll see it being abandoned at all. 

Frankly, the 264 is really not aimed at quite 
the same target market as the Commodore 64, 
because the 64 is oriented toward music and 
sprites and gaming, and it's very good for that. 
The 264 has strength in built-in programming 
capability, and as we move forward, in built-in 
software to suit a specific need. It has more word 
processing, small business package applications 
rather than gaming. 

Ithink they'll complement each other rather 
than substitute for each other. And of course the 
264 is going to be higher-priced. 

GAZETTE: Why buy a 264 instead of a 64 that has a 
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word processor and, say, a Simon's BASIC? It 
would be the equivalent of the 264 for less money. 


Jones: The difference is that the market is changing 
because the consumer is far more knowledgeable. 

So from a practical viewpoint, they look for 
more and more built-in support and material. 
That's what we're aiming to do with the 264 
series—give them some choices of basic machines. 
If they want a word processing-based machine 
without compromising, we have a machine to 
suit them. If they're interested in financial analysis 
applications or want a basic machine with that 
built in to suit them, I'm sure as we move along 
you'll see more and more complexity in what we're 
able to integrate into the equipment. 


GAZETTE: Will the built-in software on ROM chips 
be installed at the factory or done by the dealer? 


Jones: It will be done at the factory. 


GAZETTE: You have changed the keyboard on the 
264 from the keyboard used on the 64. Why? 


Jones: The whole design concept for the machine 
was different. I think we started out working with 
the SX64 (Commodore's portable 64) and found 
out that the keyboard has a slightly different 
characteristic than the 64. And we learned from 
some of the things that we found with the 64, 
which is a good bread-and-butter machine. I think 
we have a little more class with the keyboard on 
the 264. It's styled better. 

Ithink the cursor controls are easier to use 
for the average person. And we shifted around 
the function buttons for the long haul to make 
sure we had a product that was compatible with 
the 19-button numeric keyboard, so that there is a 
continuity of style in the family like we had on 
the Commodore 64 with the VIC-20. 

The other thing we've done is that we don't 
have that bulky control console with a lot of stuff 
on it. We have more of our works inside the 
keyboard itself than most other people do. 


GAZETTE: Will the new family of computers—the 
264, 364, and SX64—be sold through all of the 
same outlets as the VIC-20 and the Commodore 64? 


Jones: Absolutely. I really don't think there's any 
difference anymore. The old difference between a 
personal computer and a home computer and a 
high-end videogame has vanished. There's a desk- 
top computer now with varying degrees of capa- 
bility and varying orientations. That's because 
everybody's going after the same space. 

I think what happened with Coleco and the 
Adam is that they built in something that they 
compromised. As a result, they have the worst of 
two worlds instead of the best of two worlds. 
What we try to do with our planning is to put 
something in that's fully featured and that is 
exactly the same thing that you could buy off the 
shelf. So that, in effect, when you get it, you're 
getting something that's easy to use. You set it up 
and you roll. That's a smart philosophy and I 
applaud that. 

Our designers did that, and it was in process 
long before I joined the organization. You've seen 
our 3-Plus-1 [integrated personal productivity 
package]. It brings the technology down to the 
right level. It's got enough variety for the average 
small business. We've converted it, with the 
graphics, into something they can visualize very 
easily with very little instruction. It'S nowhere 
near a Lotus 1-2-3, but it gives you enough of the 
kind of capability that the average user can get 
mileage out of. 

That's what we're trying to achieve in almost 
every category of software we've got. Except 
gaming, where we're going after quality at a good 
price. That soccer game [International Soccer] is an 
example of the things you're going to see from us. 
Some of the playabilities we've got are outstanding. 
GAZETTE: You've said that the 264 will be available 
in the spring, essentially in the second quarter of 
1984. How realistic is that date? 


Jones: I think we're pretty far along. We have the 
operations manual already available. We also 
have 40 pieces of software for it that are ready to 
produce. They're the best of the Commodore 64 
series. So, we're trying to have some continuity. 


СА?ЕТТЕ: Have VIC-20 sales begun to taper off? 


Jones: Well, naturally they would. We started 
emphasizing the 64 last April because we felt there 
was need for a 64K machine. However, the VIC-20 
has been very steady, and we're still getting good 
orders from everybody. We'll continue to sell it as 
long as the customer buys it. We think there's a 
place for a starter computer at under a hundred 
dollars. 

СА?ЕТТЕ: We've heard rumors that Commodore 
itself might upgrade the hardware on the VIC-20— 
give it 16K. Is anything like that planned? 


Jones: It's been kicked around, but I don't think 
any decision's been made. It's a good seller. 


GAZETTE: When do you think we'll see the 364 
available? 


Jones: After the 264. [Laughs.] It depends on their 
priorities. We'll have to go back and gauge the 
reactions. But I think you'll see the 364 getting the 
voice built in and getting the numeric system or- 
ganized, but it will take a little longer than the 264. 
I would perceive it to be before the fall. I think 
you'll see the whole series out before the end of 
the summer. 


GAZETTE: Are there any other members of the 264 
family planned? 


Jones: I'm not aware of any. Essentially it's a 
productivity-oriented machine and I'm sure there 
are a lot of other things we're going to end up 
doing. It has unlimited flexibility, since you can 
build in a variety of software. We'll have to see 
what happens in the market. 

Our perception of computers may be a little 
different than others. The easiest analogy is that 
the keyboard is the library card, and to survive 
long-term, you have to offer the people who use 
it a variety of books that suit almost everybody’s 
individual taste. And that's a difficult thing to do 
when you have to reinvent the wheel. 

Look at education [software]. You could have 
six hundred or seven hundred titles in education 
alone. Our aim is to have a matrix of opportunities 
in a library. You could almost take the library card 
system and categorize it and say, well, we must 
have representative samples here because the 
average home requires this and this and this and 
this. 

That's the way we're approaching our whole 
software strategy now, which says that we have 
to provide a library that's equivalent to the public 
library and a pricing that makes it comfortable for 
the average person at home to buy. It's a new 
concept we developed, and we're just beginning 
to implement it now. 


> 


Ап income tax program for everyone to use. 
TAX COMPUTATION has been approved for 
COMMODORE'S ENCYCLOPEDIA OF 


SOFTWARE as well as many other directories. 
Yourtaxes will be completed quickly, easily, and 
to your benefit. 


TAX COMPUTATION Commodore 64 $39.95 


VIC 20, TI99/4A $19.90 
K. R. Rullman The cost of the program is tax 


4550 Murray # 81 deductible along with part of the 
Beaverton, OR 97005 сов of your computer. 
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Albert Zap, 
Won't You 
Please Come 
Home? 


Fred D'Ignazio, Associate Editor 


Albert Zap woke up from a long nap and looked 
out the window of his house. It was a sunny day. 
The sky was blue. The grass was so green it 
glowed. Albert Zap decided it was a perfect day 
for a walk. 

Albert walked out the front door of his house. 
“Tra-la-la!’” he sang. He skipped through the gate 
of the white picket fence. "Such a perfect day for 
a walk," he said to himself. 

Then something terrible happened. Albert 
had wandered only twenty yards from the front 
door of his house when the sky grew dark. A 
shadow fell on him and on the grass at his feet. 

Albert looked up, expecting to see a gloomy 
storm cloud passing overhead. He gasped. Some- 
thing was falling out of the sky. It was a giant 
purple letter, and it was falling right toward him. 
If he didn't move quickly, he, Albert Zap, was 
sure to get zapped! 

Albert tried to run, but he couldn't lift his feet. 
e was frozen in one spot. He looked up again. 
e elephant-sized letter was coming closer and 
loser, but he couldn't move. What was he to do? 


Coming То Albert’s Rescue 
Computing families to the rescue! 

į Albert needs a hero or heroine to save him. 
But not just any hero or heroine will do. It must 
be one with steady hands, nerves of crystalline 
graphite, and a heart that’s true. 


Aneducationalad 
outeducational software. 


OU studied all the computers 
and finally chose the one your 
family found most useful.One 
of the main reasons you wanted 

acomputer in the first place is to help 
your children in school. Not just to 
teach them how to use a computer, 
but also to help them get good grades 
in basic school subjects like reading 
or geography. 

That's why you should know 
about AEC, American Educational 
Computer - one of the country's 
most important developers and 
publishers of educational software. 


You can help your child all 
the way through school 
and beyond. 


AEC grew up on education. 


The management of AEC started in 
educational publishing, with collec- 
tively over 100 years of experience 
in the field. AEC knows curriculum 
and how American education is 
practiced in the classroóm. 1 
That's important because 
children should learn at 
home the same way they 
learn at school. Other- 
wise, you'll have a very 
confused child,and con- | 
fusion isnot the way  |— 
to better grades or 
better learning. 


Look for our 
display in 
your favorite 
Software store, 
and pick up 
your free 
educational 
leaflet. 


AEC knows that 
good grades are important. 


Any educational software could help 
school performance in some way. 
That’s because the computer is such 
a patient teacher, giving instant feed- 
back to questions and allowing chil- 
dren to learn at their own pace. 

But AEC software has an impor- 
tant advantage. Our approach has 
been student tested under actual 
classroom conditions.So we know 
it keeps the child's interest while it 
teaches. 


AEC gets parents involved in 
the learning process. 


With either AEC's 
MATCHMAKER"or 
EASYREADER" Series, 
you сап take your 
child through the grades 
in subjects such as 


2 Skills Reading Com- 
~~ prehension, Spanish, 
" World or US Geogra- 


teacher tested system 


phy, and Grammar. Our 


allows parents to enter material into 
a lively, interactive format. And be- 
cause AEC's programs are grade- 
leveloriented, you can help your 
child all the way through school. 


AEC doesr't play games 
with education. 


AEC programs do contain games, but 
only as rewards for learning achieve- 
ment. For example, once your child 
successfully completes the objective 
in the Matchmaker Geography pro- 
gram, he or she can play an exciting, 
action-packed 

game. 


Sure, the games are fun. But 
they're not the basis, and certainly 
not the primary focus, of any AEC 
software. Our focus is strictly on 
learning. And isn't that what you 
buy educational software for? 

If you have more questions about 
educational software, 
contact your nearest 
AEC educational soft- 
ware center. And 
thanks for being a 
concerned parent. 


American Educational Computer 


2450 Embarcadero Way, Palo Alto, СА 94303 


All AEC Products are compatible with Apple? ІВМ? PC, Atari 800,* TRS 80™ Color and Commodore 64™ Microcomputers. TM signifies manufacturer's trademark. ® signifies manufacturer's registered trademark. 


And one more thing: Albert's hero or heroine 
must be able to hunt across the computer keyboard 
and peck the letter that is about to zap him. 

Do you qualify? Does your mom or dad? Or 
your kid sister? Then pitch in, find the letter on 
the keyboard that is threatening Albert Zap, and 
give it a quick tap. 

If you find the letter before it finds Albert, 
the letter will crumble like a peanut butter cookie 
you've just sat on. 


You're Not Home Yet, 


Albert Zap 

When the letter vanishes, Albert breathes a sigh 
of relief. He has decided that he has had enough 
walking for today. All he wants to do is go home. 
He takes a giant step in the direction of his house. 

But what is this? Another letter, this time a 
giant green P, is heading right for him. And, as 
Albert stares at the sky, other letters follow the P: 
a plump yellow W, a pair of brown Q's, and a 
hefty green Z. 

Albert feels like Chicken Little. The sky is 
falling. All he wants is to go home. But he can't 
move on his own. 

Albert looks your way. You are his only hope. 
Can you find the letters on the keyboard and tap 
them, one at a time, before they reach Albert? 


Finding A Champion 

Albert is not picky about his hero or heroine. He 
might be a four-year-old with a quick little finger. 
Or a 68-year-old who won't desert Albert in his 
hour of need. He'll stay by the keyboard hunting 
and pecking until he gets Albert home. 

But one thing is certain: Albert needs a true 
champion, someone who will stick with him even 
when the going gets tough. 

And it does get tough. 

Getting Albert home looks deceptively easy. 
After all, the letters are floating down so slowly, 
lazily dropping from the sky. This game is a snap. 
You merrily tap the keys, and Albert jogs along 
toward the safety of his house. 

Then disaster strikes. A giant Y falls toward 
Albert. You see the Y and try to type it, but you 
miss and strike a T instead. 

Albert notices your keyboarding blooper and 
despairs. He loses all hope. And he loses his mind. 
He does the opposite of what he is supposed to 
do. He turris around and takes a giant step away 
from his home. 

Albert's foolish behavior rattles you. Hastily 
you type another letter. You aim for a B butinstead 
type a V. Albert takes another giant step away 
from home. You see more letters and make more 
mistakes. Now Albert is jogging in the wrong 
direction. The distance between him and his home 
is steadily widening. 
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Safe At Last! 


Don't give up hope. Albert isn't lost yet. A true 
champion will keep typing. She may hit some 
wrong letters, but most of the letters will be right. 
Each time she types the wrong letter, Albert scur- 
ries away from his home. But each time she taps 
the right letter, Albert turns around and runs in 
the right direction. 

And eventually Albert makes it home. 


Albert Zap won't make it back this time in AlphaZap. 


But if he doesn't, that's all right, too. Albert 
isn't hurt—except for a mild headache from being 
beaned with a blimp-sized letter. And, with just 
the touch of a button, you can start the game over 
again and give him another chance. Once again, 
Albert is back outside his house going for a walk, 
and a new group of overweight letters is falling 
out of the sky. You can keep coming to Albert's 
rescue until you finally bring him home. 

Unfortunately, Albert Zap does not have a 
lot of sense. As soon as you bring him home, in- 
stead of thanking you he heads back out his front 
door for another walk. Seconds later, more letters 
are raining down out of the sky. 

It seems Albert Zap likes to live dangerously. 


QuickFinger 
Albert Zap is the hero of a typing game called 
AlphaZap, put out by Quick Brown Fox, Inc.—the 
people who make the Quick Brown Fox word 
processor for the VIC-20 and the Commodore 64. 

AlphaZap runs on the Commodore 64. It is 
part of a trio of typing games, collectively known as 
QuickFinger. The QuickFinger package comes on 
disk and costs under $40. It should already be in 
the stores, but if you can't find it, you should 
contact Quick Brown Fox directly: 

Quick Brown Fox 

536 Broadway 

New York, NY 10012 

(212) 925-8290 


Kids climb to the top in 
our playground... 


Because we offer more than just educational games. Our unique software brings the. magic touch of the 
Edumate Light Pen™ together with the amazing computer voice of $.A.M.™, the Software Automatic Mouth, so children can interact 
directly with our teaching programs. Playground Software!" makes learning and learning to use the computer child's play! 


Our playground of active, colorful animals will have your 
child spelling new words in no time at all. Animal Crackers™ 
combines the use of the Edumate Light Pen'^ and children's 
fascination with animals and computers to teach your 
children the alphabet as they learn to spell. By simply 
touching a letter on the screen with the Edumate Light Pen™, 
your children will create a screen full of animals and other 
playful objects. Not only is it fun, it's educational! 


Unleash the creative talents of the big kids and the little kids 
in your family with the first electronic coloring book. Com- 
puter Crayons™ comes complete with ready-to-paint scenes 
and an artist's palette of vibrant color. Additional options per- 
mit you to save and restore pictures easily, draw circles, lines, 
boxes, and erase in a single stroke. 

Let your imagination run wild with the Sketch Pad that 
allows you to create your own video paintings from scratch. 

Now anyone can transform our Edumate Light Pen™ into 
an electronic paint brush with Computer Crayons™! 


The most fundamental lesson every child must learn is how 
to draw the letters of the alphabet. The Alphabet Arcade™ 
utilizes the Edumate Light Pen™ and an exciting arcade en- 
vironment to provide the children with an innovative way to 
acquire basic lettering skills. Mistakes are noted immediately 
and correct entries rewarded in a series of action-packed set- 
tings that will delight and inspire your children. Discovering 
the alphabet has never been this much fun! 


Playground Software!" presents a series of engrossing tales 
that use our Edumate Light Pen™ and your child's imagina- Bedtime 
tion to tell a story. 

Our first Bedtime Story enlists the aid of your child to help Storie Ta 
Little Red Riding Hood escape from the Mean Old Wolf, and S 
has all the colorful animation and full-scale sound that 
children love. 

Your child will be taught letter and word recognition while 10 Grade 
having all the fun that goes along with helping to tell a story. 819 
So let your child play а part іп (ће first of our interactive and 
educational bedtime stories...Little Red Riding Hood! 


Preschoo/ 


All Playground Software is lightpen and joystick compatible. 


Playground Software...Kids are all over us! 


Each package $29.95 on disk or cassette. Prices subject to change without notice. See your local dealer or order direct from p.o. box 3470, 
department cg, chapel hill, north carolina 27514. Add $3.00 for postage and handling. Credit card orders call 1-800-334-SOFT. 


During December and January you can take advantage of our Special Christmas Offer and receive an Edumate Light 
Pen™ (retail price $29.95) for only $14.95 when you purchase all four Playground Software™ packages, or receive a 40% 
discount toward the purchase of the Edumate Light Pen™ when you buy any Playground Software™ program. 


Atari 400/8007 and Commodore 64" M are trademarks of Atari Inc. and Commodore Electronics, Inc. respectively. S.A.M.TM is a trademark of Don't Ask Software. 


Keyboard Pacer 


Tackling The Terrible Keyboard 


Which part of a computer terrifies people the 
most? Is it the alien-looking floppy disk drive? 
The blank, empty-looking display screen? The 
snakelike cables? 

Nope, it's the keyboard. The keyboard is like 
a wall that most adults and kids have to climb 
over. And most of them don't. 

For little kids the keyboard is a jungle, stuffed 
with too many keys in too small a space. Kids’ 
eye-scanning and finger-tapping motor skills often 
aren't up to tracking down and pressing that 
unique key that will make a program run or a 
game reward them. Computer keys often leave 
small children with tears, anger, and frustration. 

The situation isn't much better for adults. 
Most adults don't know how to touch-type. Most 
adults have never heard of OWERTY. They have 
learned their alphabet from A through Z, then 
they look at a computer keyboard and find the 
letters all mixed up. 

And if the jumbled letters weren't enough to 
stop them, all those extra keys on a computer 
64 COMPUTEI's Gazette April 1984 


keyboard will. How might a fearful adult feel about 
the keys with names like BREAK, STOP, CON- 
TROL, END, RETURN, and ESCAPE? For an 
anxious adult, even a “friendly” computer key like 
HELP can take on an ominous, sinister meaning. 


Taking The First Step 


Yet what would computers be without their 
keyboards? There are more and more alternatives 
to the keyboard. New devices for interacting with 
the computer are now appearing on the market, 
including mice, touch pads, and light pens. But 
the computer keyboard is still the primary way 
most people tell the computer what they want it 
to do. 

We have to find ways to help people cope 
with the computer keyboard. One way is the 
typing program. 

Typing programs, like Typing Tutor by IBM, 
Type Attack by Sirius, and MasterType by Scar- 
borough, are a godsend to the average family 
member who is interested in learning how to use 
a computer but who is put off by the computer 
keyboard. 

QuickFinger, from Quick Brown Fox, is, in my 
opinion, one of the best of these typing programs. 
Itis for a very popular machine (the Commodore 
64). It makes learning the computer keys easy 
and fun rather than boring and tedious. It has a 
trio of games, so you can switch back and forth. 
When you get tired of playing one game, you can 
switch to another game and still be practicing and 
improving your keyboarding skills. And the 
games are deep. 


Deep Typing 

Tripp Hawkins of Electronic Arts has called fora 
new generation of microcomputer programs for 
the average person. To be for everyone, a program 
must be hot (appeal to the senses), simple, and 
deep. 

What Hawkins means by deep is that a pro- 
gram must be suitable for users at a variety of 
skill levels or for a single user who is acquiring 
new skills and becoming more sophisticated. The 
program must be able to teach a person at one 
level, then it must be prepared to continue teach- 
ing the same person at ever higher levels. 

The QuickFinger programs are deep. They are 
suitable for little children with tiny fingers or high- 
level executives with meaty paws or long painted 
fingernails. They are for hunt-and-peck or swift 
touch typists. They can be your first introduction 
to the computer keyboard or your refresher 
course, even if you already type 50 words a minute 
or more. 

All the QuickFinger programs operate at mul- 
tiple skill levels. You can enter a program at level 
one or level sixteen. Or you can let the program 


Get more out of your Commodore with 


COMPUTEs · 
GAZETTE 


For Owners And Users Of Commodore VIC-20" And 64” Personal Computers 


e 


More programs 


Programs to help you balance your 
checkbook, store your addresses, keep 
tax records, manage your personal 
Moses You can create your own pro- 


More fun 


Martian Prisoner, The Viper, Skydiver, 
Snake Escape, Demon Star, Cyclon Zap 
and Oil Tycoon are just a few of the 
ready-to-run games you'll find exclusive- 
ly in COMPUTE!'s Gazette each month. 
Just type in the programs and watch 
your screen explode with colorful new 
computer game excitement. 


More challenge 


Ready to tackle more advanced projects? 
In COMPUTE! Gazette you'll learn How 
to Use Tape and Disk Files. How to Pro- 
gram the Function Keys. Writing Trans- 
portable Basic. How to Make Custom 
Graphics Characters. New Ways to 
Enliven Programs with Sound. One Touch 
Commands for the 64. How to use 
Machine Language. Speeding up the 
VIC 20—and much more! 

Children will learn and develop 
new skills with States & Capitals Tutor, 
Wordmatch, Munchmath, Wordspell, 
Connect the Dots, Aardvark Attack and 
Alfabug. Computing for Kids, a regular 
monthly feature, will uncover new ways 
to involve your children in computing. 


Hor 
stared Arama WARE 
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grams and games, improve your word- 


6 processing, spreadsheets and data 


base management, load and run faster 


with 64 Searcher, VIC/64 Program Life- 


saver, Quickfind, Word Hunt, Disk Menu, 


VIC Timepiece, Automatic Proofreader 


and more. 


Pao ne sepe 


More buying 
guidance 


You'll profit from comprehensive reviews 
of everything from data-quality cassette 
tapes to software to graphics plotters and 
modems. Virtually anything that's compat- 
ible with your Commodore is reported 

on in COMPUTE!S Gazette. With this 
kind of expert help, every computer pur- 
chase you make can be the right one! 


More savings 


You can save up to 4096 off the news- 
stand price of COMPUTE! 's Gazette by 
subscribing now. All you do is mail the 
coupon below or the postpaid card 
bound into this issue. But don't delay! 
Subscribe now to start receiving every 
issue of COMPUTE! Gazette. 


Yes! Start my subscription to 
COMPUTE!’s Gazette at big 
savings off the newsstand price: 
O 1 year. $20—Save $10 

2 years $36—Save $24 

О 3years $54— Save $36 


Name 
Address 
City 
State Zip 

Payment enclosed [O Bill me 
Charge my 

Visa ГІ MasterCard L] Am. Ex. 

/ 

Account No. Exp. Date 
COMPUTE'S CALL TOLL FREE 
GAZEPPE — 800-334-0868 


P.O. Box 961, Farmingdale, N.Y. 11737 


Which 
Software Is 


Worth The 
Money? 


Find out in: 


The SOFTWARE 
BUYER'S REPORT '" 


The newsletter that gives you 
the real story behind the software hype. 


* No advertising means honest, unbiased evaluations 
* Topnotch reviewers offer opinions you can trust 
* Get in-depth reviews of software for: 


Games and Entertainment * Graphics and Music * Home 
Applications * Education * Business * Programming Aids 
* Telecommunications * And more! 


NEW!! COMMODORE 
64/VIC 20 EDITION 


Devoted only to software for Commodore's home computers. 
BY SUBSCRIPTION ONLY — NOT 
AVAILABLE ON NEWSSTANDS 


Published ten times a year. Special charter rate 


Subscription rate $35.00 a year U.S. faye ere 


(Canadian and Overseas Additional) 329. 95 


Start Getting The 


Most Out Of Your 
Software Dollar! 


FILL OUT AND MAIL TODAY OR CALL 
800-336-3535 TO ORDER (In Penna. 215-691-1912) 


YES! | want to subscribe! I've enclosed my check or money 
order for $29.95. 


(Payable to The Software Buyer's Report) 
Send me more information right away. 


Name = 2 = = 


Phone [area code) __ 


Address — - 
City State _ ease Hip 
Computer Model: МІС 20 [_] Commodore 64 


The SOFTWARE BUYER'S REPORT 


824 Eighth Avenue 
Bethlehem, PA 18018 


CG4-84 


lead you automatically through the levels as your 
skill increases. Your progress is slow but steady. 
If you are having trouble mastering a certain level 
you can hang around until you feel comfortable 
and ready to try something more challenging. 

As you progress the computer keeps score. 
You can save your scorecard on disk and recall it 
easily for later sessions on any of the three programs. 


An Extra Bonus 

I have focused only on the AlphaZap program, 
but the other two programs are lots of fun, too. 
Keyboard Pacer shows a picture of the computer 
keyboard on the picture screen. One at a time, the 
letters on the buttons turn black. When you find 
that letter and press it, a new letter turns black. 

This is a good program for even the tiniest 
child or the most fearful adult. You might be able 
to find only one key in two minutes, but if you 
get it right, you are rewarded. 

The last program is called Link the Letters. 
This time you see a grid of fenced-in giant letters, 
like a screen-sized crossword puzzle. You have to 
link the letters into words. When you make up a 
real word, you get points and are rewarded with 
a charming sound like two crystal champagne 
glasses clinking together in a toast. 

As a parent, I especially like the Link the 
Letters program. It is a good spelling game for my 
children. It helps develop their eye-tracking skills 
(up, down, to the left, and to the right). And it 
teaches them some of the structure of the English 
language, including common word beginnings, 
two-consonant blends, and word endings. It 
makes our language playful. And it helps a child 
learn how to organize words and recognize 
patterns. 


And Now Back To Albert 


The best thing about QuickFinger is that when you 
get tired of linking letters and pacing yourself on 
the keyboard, you can go back and rescue Albert 
Zap again. He's a nice guy, really. But he doesn't 
have enough sense to come in out of the rain. 


DATAFILE MANAGER 
DATABASE MANAGEMENT FOR THE COMMODORE-64 


Successfully used in computer classes to teach the concepts of random files 
and ISAM to beginning users... but sophisticated enough for home and small 
business use. Consists of 5 disk programs and comprehensive loose-leaf manual 
with step-by-step instructions. Includes build-file program for ready-to-use 1000 
record mailing list, zip-code sorted label printing and alpha phone list printouts. 
‘SPECIFICATIONS: Menu driven * 80 characters per field * 15 fields per record • 254 characters 
per record * Up to 1200 records per disk * ISAM random access files е Sort on any field * User- 
defined alpha and numeric fields • Nested sorts « Nested totals and subtotals * Compiled for 
speed • User-defined print formats with top and bottom headers, page length and skip over perf 
* View or print selected information from your file. 
SYSTEM REQUIREMENTS: C-64 Computer ° 1 or 2 1541 disk drives • TV or monitor (color or BMW) 
* Properly interfaced printer (program runs with limited applications without printer). 
$40 postpaid 
KENNeWRITER Extremely easy to use menu driven wordprocessor that works with 
any properly interfaced printer. Both youngsters and adults love this one! 
SPECIFICATIONS: Compiled for speed » Word wrap « Programmable function keys e Insert on/off 
* Move line/block * Delete line/block • Search • Search and replace * User-defined print com- 
mands • Automatic page headers and numbers • Merge files « Chain files * "Wedge" disk com- 
mands emulated * Step-by-step manual * System requirements as above. 
$30 postpaid 
ORDER BOTH PROGRAMS—JUST $55 postpaid 
JAMESTOWN SOFTWARE 


2508 Valley Forge е Madison WI 53719 е 608-271-5527 
COD's Accepted © Dealer Inquiries Invited 


Making Calendars 


Paul C. Liu 


Put your printer to good use by making a full 
set of calendars. These four programs will give 
you a screen calendar, a wall calendar, an ap- 
pointment calendar, and one for the year at a 
glance. For the VIC-20 and Commodore 64. 


A practical use for a computer with a printer is 
making your own calendars. Here are four 
calendar-making programs written for the VIC-20, 
three of which require the use of a printer. Since 
the programs are written entirely in BASIC with- 
out PEEKs or POKEs, they will also run on the 64 
and can be easily adapted for 
other computers or non- 


twenty-first centuries, up to the year 2100. If you 
really want to be meticulous beyond that, you can 
make further modifications by reducing D1 by 1 
after March 2100, and repeating that every 100 
years. You must do this because the century years 
like 2100 and 2200 which are not divisible by 400 
are not leap years, but the algorithm treats them 
as if they were. 

The programs contain modifications like the 
above to make them accurate for the next five 
centuries, provided, of course, that the current 
calendar system is not reformed. (The last calendar 
reform was in 1752.) 

Once we know the day of the week for the 


Commodore printers. E aùn mx» m TheWall Calendar (Program 2). 
In calendar making, it is i = "h km 
essential to know the correct day | ™ br = x 
of the week for any given date. If. ШЕШ шша mem. 
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This algorithm performs flaw- 
lessly for the twentieth and 
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The Appointment Calendar (Program 3). 
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given date, especially the first day of the month, 
the rest of the calendar-making task is just a matter 
of setting up and getting the proper format and 
display. 


A Monthly Calendar 


Program 1 will display a monthly calendar on the 
screen. In this and the other programs, after you 
load the program, type RUN and press RETURN, 
the computer will briefly explain what the program 
is for and ask you to input the month and year of 
the calendar you wish to see. The numbers should 
be separated by a comma, and the year should be 
the full four digits (1984, not84). Then the monthly 
calendar of your choice will be displayed on the 
screen. 

Program 2 will give you a copy of what you 
see on the screen in the first program by printing 
it on your printer in enlarged form. This is a long 
program (it requires 8K memory expansion on 
the VIC) because it contains a set of enlarged num- 
bers and characters, together with a bank of sub- 
routines to use them. The result is a calendar you 
can hang on the wall. 

Program 3 also gives you a printed monthly 
calendar, but in a different format. The program 
tabulates the days of the month as a list. It can 
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serve as an appointment calendar for your desk, 
with room for short notes each day. Along with 
the regular date, you are told what day of the 
year it is. This program RUNs on the VIC without 
memory expansion. 


A Year On One Sheet 


Program 4 will give you all 12 months of the year 
printed on one sheet. The message "Happy New 
Year” is at the top of the calendar, but you can 
put a different short message there by modifying 
the text in line 7. This program also needs no ad- 
ditional memory for the VIC. 

In Programs 2, 3, and 4, after you input the 
month and year as requested, the computer 
prompts you to turn on the printer. Before you do 
this, you should set the perforation of the printing 
paper over the starting position of the print head 
so that the calendar will appear entirely on one 
sheet of paper. The programs are written for the 
Commodore 1515 and 1525 printers. Other printers 
may require modifications to the program. 


See program listings on page 150. @ 
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WITH NIGHT MISSION 


PINBALL 


You deserve the best. You’ve earned it. Now reward yourself with a session of Night Mission PINBALL, 
the most realistic and challenging arcade simulation ever conceived! g Stunning graphics and dazzling 
sound effects put Night Mission PINBALL in a class by itself. Game features: multi- 
ball and multi-player capabilities, ten different professionally designed levels of play, 
and an editor that lets you create your own custom modes. m So take a break with 
Night Mission PINBALL from SubLOGIC. Winner of Electronic Games magazine's 
1983 Arcade Award for Best Computer Audio/Visual Effects. 


See your dealer... ӘЛОЛОСІС 


or write or call for more information. For direct orders please add $1.50 for = 
shipping and specify UPS or first class mail delivery. Illinois residents add 5% Corporati on 
sales tax. American Express, Diner's Club, MasterCard, and Visa accepted. 713 Edgebrook Drive 


Order Line: 800/637-4983 eei eee 


“French Tutor" is a helpful study aid designed 
for those learning or strengthening Frenc 
vocabulary and translation skills—English to 
French, or French to English. Written for the 
VIC-20, we've added a version for the Com- 
modore 64. 

р] 


With two children studying French іп elementary 
school, one of my reasons for buying the VIC-20 
was to create some French instructional programs. 

“French Tutor” was suggested by Steve 
Steinberg's “Language Lab" (COMPUTE!, July 
1982), which provided for both drill and transla- 
tion. It was relatively easy to adapt to the VIC, 
with a few minor modifications. For example, a 
dummy word (XX) is needed as the last item in 
the DATA statements to prevent the program 
from running out of DATA if a particular word 
is not in the list. 


Custom Accented Characters 
Another modification involved the use of ac- 
cents, which Language Lab did not include. 
The solution was to create the accents with 
programmable characters, as described in “Cus- 
tom Characters for the VIC" by David Malmberg 
(COMPUTE!'s First Book of VIC). Program 1 de- 
scribes which keys have to be pushed to obtain 
accented characters. 

In addition to the familiar accented vowels, 
this program includes some which are used less 
frequently—the umlauted é as in Noél, ü as in 
Saül, and ó for words of German origin. Also 
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Michael Quigley 
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A correct translation is entered in "French Tutor (VIC 
version). 


included are the combined ce for words like 
ceuvre and ге as in Cesar. 

Program 1 also has a musical signature 
(which could be eliminated if it begins to pall). 


Language Drills 


Program 2, which is loaded by Program 1, is 
made up of four sections: French to English vo- 
cabulary drill, English to French vocabulary drill, 
French to English translator, and English to 
French translator. Because of severe restraints 
on the VIC's memory in Program 2, there are 
only 101 words, most of which employ accents 
and are no longer than five letters. With more 
memory, this total could be increased. If you do 


ACCESS 


NOTHING BUT THE BEST ` 


GENERAL QUARTERS! BATTLE 
STATIONS! As chief commander of land and sea 
forces in the Pacific, your mission is to obtain a 
quick naval victory, and invade enemy territory with 
land forces. BEACH-HEAD,wis а 100% machine 
language game and offers multi-screen action with 
high resolution, three dimensional graphics. 
(Suggested retail price...$34.95) 


NEUTRAL ZONE; takes you to the outer NEUTRAL ZONE — 
edges of the galaxy, to ALPHA IV, a long range imeem 
early warning station whose mission is to detect 
alien intruders from other galaxies. 


NEUTRAL ZONE; is the ultimate in high 
resolution, fast action, arcade quality games. It is 
written in 100% machine language and features — 
smooth scrolling of the 360 degree panorama. The NE NN NEC Е 
realism is unbelievable. (Suggested retail 
price...$34.95) 


MASTER COMPOSER: is the perfect utility 
for programming music on the Commodore 64, It 
is fun, easy to use and very powerful. Master 
Composer takes full advantage of the sound 
synthesizer to produce all types of music from 
simple melodies to intricate compositions. You 
can compose your own musical scores, experiment 
with different arrangements and instruments, 
program your own accompanyment, or just type 
in your favorite sheet music. (Suggested retail 
price...$39.95) 


poser 


Master Comi 


SPRITEMASTER is not just another sprite 
editor. It's the finest utility available for multicolor 
sprite animation and game programming. It will 
have you making full color animated objects in just 
minutes. People running, birds flying or tanks rolling 
are a snap with Spritemaster. It will automatically 
append your sprites to other programs. It’s easy 
to use and understand and comes with a full 21 page 
instruction manual and samples of animated sprites 
to get your started. (Suggested retail price...$34.95) 


SPRITEMASTER" ` 


AVAILABLE NOW AT YOUR LOCAL COMMODORE DEALER 
ACCESS SOFTWARE, INC. 925 EAST 900 SOUTH SALT LAKE CITY, UTAH 84105 (801) 532-1134 


PRESS |М TO CONTINUE. 


m Ҹ 

ЕТТЕ a 
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“French Tutor” also includes French accents and symbols 
(64 version). 


have more memory, make the corresponding 
change to the number in line 43 (line 1610 in 
Program 3 for the 64) which randomly selects 
the words. 

Additional memory can also be used to add 
more sound, but that will necessitate relocating 
the programmable characters. Also, the random 
selection of words can be changed so that, for 
example, if eight words are chosen, none will be 


VIC 20 


Now you can have the memory power of 
The 64, flexible memory control, expansion 


port and more. 


$129.95 
MOSAIC. 


ELECTRONICS, INC. 
Call for your nearest Mosaic Dealer 
1-800-547-2807, In Oregon 653-7885 


VIC 206 a registered trademark of Commodore Business Machines Inc. 


72 COMPUTE!’s Gazette April 1984 


repeated, which is not possible as the program is 
presently written. 

Using the program with a disk drive opens 
up even more interesting possibilities. The four 
sections of Program 2 could be transformed into 
four individual programs, which could then be 
accessed by the menu. The disk drive's speed is 
anassetin jumping from one program to another, 
or to the menu itself. 


Use The Keyword 


| Abbreviations 


Memory in Program 2 is at a premium, and no 
extra spaces should be inserted. In order to make 
some lines fit in the maximum 88-character length, 
BASIC keywords should be abbreviated—PRINT 
becomes ?, GOSUB becomes GO followed by 
SHIFTed S, DATA becomes D SHIFT-A, and so 
on. (See Personal Computing on the VIC-20, pp. 
133-34, or pp. 263-64 of the VIC-20 Programmer's 
Reference Guide.) In particular, lines 1-5 and several 
of the DATA lines require abbreviations. 

Don't attempt to RUN the finished Program 
1 more than twice to see if it works, or you will 
get an OUT OF MEMORY message. SAVE it on 
tape often when creating it, so you can always go 
back to your previous version if this should 
happen. 


Adding Words 


The maximum number of words allowed for each 
Vocabulary Drill section in Program 2 is nine. 
This is because the VIC recognizes only the first 
integer with the GET A$ statement in line 10, 
which doesn't require the user to hit the RETURN 
key; that is, 20 words would become 2 words. In 
order to increase this number to 10 or above, elimi- 
nate the question mark from line 9, and make the 
following substitution for lines 10 and 11: 


10 ІМРОТМ:ІЕМ<1ТНЕМ10 
11 IFCO-NTHEN14 


:rem 83 
:rem 162 


This now requires use of the RETURN key after 
the number is input. 
For the 64 version, change lines 1280-1290 to: 


1280 INPUTN:IFN«1THEN1280 
1290 IFCO-NTHEN1320 


:rem 39 
:rem 109 


To make the program work with a disk drive, 
give Program 2 the name "F". Then, in Program 
1, delete line 555 and make the following 
changes: 


390 IFAS$-"N'THENPOKE36869,255:GOTO560 


:rem 163 


580 POKE7993,34:POKE7994,6:POKE7995,34:PO 
KE7996,44:POKE7997,56 :rem 121 
590 POKE198,1:POKE631,131:END :rem 161 


See program listings on page 146. @ 


@ Fully screen-oriented 


@ Horizontal and vertical scrolling 


€ Imbedded commands 


BLIZTEXT 
FOR THE 


BLIZTEXT — SUPER WORDPROCESSOR 
for the Commodore-64 
— ONSALE NOV! — 


€ Fully screen-oriented, up/down, left and right 
scrolling — Upper and lower case 

@ More than 70 commands 

€ Full I/O compatibility with Commodore peripherals 
Upper and lower case 

€ Works with practically every printer on the market, 
user definable printer control commands 

@ INCLUDE command allows handling large files 
on up to 4 diskettes or on cassette. 

@ Build in terminal software for electronic mail and 

networking. Telecommunications mode, upload and 

download, save on disk or cassette. 

Dynamic formatting, Imbedded commands 

Single keystroke for disk directory and error channel 

Program comes on disk or cassette 

Double line spacing, left and right margin justification, 

centering, page numbering, and practically everything 

one expects from a good wordprocessor. 

AVAILABLE NOW! 


Order #4965 $89.00 
Manual only (62 pages) $29.95 
MACROFIRE -- 


Editor/Assembler for the Commodore-64 
ON SALE NOW 
AVAILABLE IMMEDIATELY 

One outstanding tool, consisting of 3 powerful elements 
combined into one efficient program! 

1.) Fully screen-oriented Editor (more than 70 

commands) 

2.) Very fast assembler with macro capability 

3.) Machine Language Monitor 
Assembly can be started from the editor. Translates in 
3 passes. More than 1,000 lables, screen oriented/no line 
numbers, scrolling, includes disk files. 
Practically everything the serious machine language 
Programmer needs everyday! 
Manual only 
Order # 4963 


Ыш к. 


819.95 
589.00 


Look at these 
Features 


@ Terminal mode — never seen before on a wordprocessor 


@ Supports Commodore disk and cassette handling 


WORDPROCESSO 
COMMODORE 64 a 


Worüpracessür 
for 


Commodore-64 and 
VIC-20 are trademarks 
of Commodore 
Business Machines. 


Ж 


THE GREAT BOOK OF GAMES, VOL.I, 

by Franz Ende 

46 programs for the Commodore 64 

Introduction to graphics and sound. How to program 
your own games. Walking pictures, animation, high 
resolution graphics, programming tips and tricks, hints 
and useful subroutines for the beginner and advanced 
programmer. This book is a MUST for every C-64 owner. 


Come and get it — It’s yours for only $ 9.95 
Order #182 128 pages $9.95 
Programs from the book on disk. 

Order #4988 $19.95 


MORE ON THE SIXTYFOUR, by H.-C. Wagner 
How to get the most out of your powerful Commodore 
64. Very important subroutines, tricks and hints in 
machine language for your C-64. How to modify DOS. 
How to connect a parallel and serial printer. How to 
design your own terminal program for communication 
and networking. Dig into 1/0 for cassette and disk. 


Order #183 $9.95 

Programs from the book on disk 

Order #4989 $19.95 
NEW PRODUCTS 


Watch out for our new books, software and add-oris to 
come soon. ON SALE NOW! — ORDER TODAY! 

How to program in 6502 Machine Language on 
your C-64 ‚Ьу$. Roberts (Introduction) 

Order-# 184 $12.95 


Commodore-64 Tune-up, Vol. І, by S. Roberts 
How to expand and customize your C-64. 

Order #185 $12.95 
Small Business Programs for the Commodore-64 
by S. Roberts 

How to make money using your C-64. Mailing list, 
invoice writing, inventory, simple wordprocessing and 
much more. 

Order # 186 $12.95 


Dealer and Distributor inauiries are invited. 


PAYMENT: check, money order, VISA, MASTER 
CARD, Eurocheck, “ACCESS, Interbank 
Prepaid orders add 83.50 for shipping (USA) 


55.00 handling for C.O.D. 


All orders outside USA: add 15 % shipping, Califor- 


nia residents add 6.5 % sales tax. 


BLIZTEXT isa 


trademark of ELCOMP 
PUBLISHING, INC. 


BUSINESS 
PACK 


ноғаскен >? 


Hardware Add-Ons: 

Parallel printer interface KIT Order #4990 8 19.95 
Universal Experimenter Board Order #4970 $ 9.95 
Expansion Board, space for four ex- 

perimenter boards(board only) Order #4992 $ 29.95 
Tricks for VICs, No. 176 $9.95 
Universal Experimenter board for VIC $9.95 


Book №. 184 $12.95 Book No.182 $9.95 


NEW Products for the 
C-64 


More on the 


j SUPERMAILING (D) 
Sixtyfour 


Order No. 4962 $49,- 
Superinventory (D) 
Order-No. 4961 S 49,- 
BUSIPACK 1 (D) 
Order-No. 4963 $99,- 
SixtyFORTH (D) 
FigFORTH for C-64 
Order-No. 4960 $39,— 


For your VIC-20 
Tricks for VICs 
Order-No. 176 $9.95 
Universal Experimen- 
ter board 

Order-No. 4844$9.95 


ELCOMP PUBLISHING, INC 
53 Redrock Lane 
Pomona, CA 91766 
Phone: (714) 623 8314 

Telex: 29 81 91 


Book Мо.183 $9.95 | 


REVIEWS 


Edumate 
Light Pen 


Dan Carmichael, 
Assistant Editor 


In a recent poll conducted by 
our sister publication, COMPUTE!, 
only 6 percent of the readers 
indicated they own a light pen. 
In this age of the computer, the 
light pen has yet to catch on. It's 
unfortunate, too, because the 
light pen can make programs 
both easier to use and fun for 
the noncomputerist. 

One such product is the 
Edumate Light Pen offered by 
Futurehouse. It comes com- 
pletely wired and ready to plug 
into the joystick port of your 
Commodore 64 or VIC-20. Also 
included are an instruction book- 
let and a software package con- 
taining various programs for the 
light pen. 


A Full Demonstration 


The software includes a hi- 
resolution drawing program, a 
disk utility, a music program, 
and a game of 3D Tic Tac Toe. 

Draw Routine lets you draw 
in the hi-resolution graphics 
mode using the light pen. You 
are offered a choice of 16 colors 
(64 version), with options to 
clear the whole screen or erase 
individual lines. 

Disk Utility is a general- 
purpose DOS (disk operating 
system) program which offers 
you a display directory option, 
and the ability to use the light 
pen to select a program, load, 
and run it. You can also initialize, 
validate, or format a diskette, 
display the directory, and scratch 
any files or programs. 
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Our artists enjoyed drawing with the Edumate Light Pen. Here are two samples 


of their work. 


3D Tic Tac Toe is played on 
four grids measuring four 
squares by four squares each. 
You select the grids and squares 
with the light pen. You win by 
placing an x in four squares hori- 
zontally, vertically, or diagon- 
ally, on one grid or all four. 

Pen Music lets you play 
music by touching the light pen 
to various dots on the screen. 
You're given an array of 12 
notes—a full musical scale—in 
any one of eight octaves. You 
can also use the light pen to select 
changes in decay, and the type 
of waveform you wish to use. 


А Few Restrictions 


While all of the programs are 
usable, they do contain a few 
serious restrictions. 

Only BASIC programs can 
be loaded using the disk utility. 
Because the format LOAD 
“filename’’,8 is used instead of 
LOAD “Шепате”,8,1, machine 
language programs that do not 
load beginning at location 2049 
(the start of BASIC in the 64) will 
neither LOAD nor RUN. 

The disk formatting option 
does not give you the choice of 
selecting a name for the diskette. 
All disks are formatted with the 
same header: “LPcreate wile 

While the music program 
does offer you the option of 


selecting the waveform and the 
decay setting, you cannot choose 
the filter, volume, attack, or sus- 
tain settings. 

One of the more serious 
restrictions is found in the Draw 
Routine program. After creating 
your drawing, you are unable to 
SAVE it to tape or disk. 


A Good Teaching Aid 


One important point about the 
light pen is its natural ability to 
attract and hold a child’s atten- 
tion. The light pen can be the 
added bonus that keeps a child 
interested in a math or spelling 
program. 

Also, if you’re a parent with 
even beginning or intermediate 
programming abilities, you can 
write your own tutoring pro- 
grams. 

In addition, Futurehouse is 
developing several educational 
and graphics software packages 
designed for use with the pen. 

The price of the Edumate 
Light Pen is also a plus. While 
some software games can cost 
$29—$39 or more each, the price 
of the Edumate includes both 
the light pen and the software. 
Edumate Light Pen 
Futurehouse 
Box 3470 
Chapel Hill, NC 
$29.95 


; BAS 
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In The Chips: 


Playing To Win In Business 


Tony Roberts, Assistant Managing Editor 


An understanding of basic busi- 
ness concepts is a by-product of 
the competition in In the Chips, a 
program from Creative Software. 
The game is available on cartridge 
for the УІС-20, with а Commo- 
dore 64 version forthcoming. 
Playing against either the 
computer or another person, 
you attempt to make the most 
money by developing, manufac- 
turing, advertising, and mar- 
keting a group of products. 
The game involves a series 
of turns in which you and your 


competitor each make decisions 
for the following business quar- 
ter. After your plan has been 
entered, the computer lets each 
of you know how you fared. 
Then you go on to the next quar- 
ter, modifying your decisions 
based on the results of the first 
quarter. 


Building A Business 
You begin the game with a 

$100,000 investment in your 
company. Your first move is 
product development. You may 


HUNDREDS OF PROGRAMS AVAILABLE 
FOR THE COMMODORE 64 & VIC 20 


Commodore 64 


== 


HOME/BUSINESS 
Practicalc (D) 

Multiplan (D) 

Bank St. Writer (D) 
Smart 64 Terminal 

Quick Brown Fox (CT) 
Paper Clip (D) 

Word Pro/SpellRight (D) 
CalcResult Advanced (D) 
Data Manager (D/CASS) 
Home Acct (Continental) (D) 
Delphi's Oracle (D) 
CompuServe Starter Kit 
EDUCATIONAL 
Facemaker (D/CT) 
Kindercomp (D/CT) 
Delta Drawing (CT) 
Type Attack (D) 

Early Games (D/CASS) 
Barron's SAT (D) 
Snooper Troops #1 (D) 
Alphabet Zoo (CT) 
Koala Touch Tablet 
Mastertype 


41.50 
72.95 
49.95 
31.95 
42.95 
66.50 
72.95 
109.95 
18.75 
49.95 
99.95 
29.95 


22.95 
19.95 
26.95 
28.95 
22.50 
59.00 
26.95 
22.95 
72.95 
28.95 


All Prices up to 
40% OFF RETAIL 


GAMES 

Choplifter (CT) 

Lode Runner (D) 
Enchanter (D) 
Jumpman (D/CASS) 
Beach Head (D/CASS) 
Neutral Zone (D/CASS) 
Planetfall (D) 

Star Trek (CT) 


28.95 
25.95 
37.00 
27.95 
26.95 
26.95 
37.00 
29.00 


HARDWARE AND ACCESSORIES 
Cardprint G 
The Connection Parallel Int. 
Cardco 3 Slot Exp. Board 
Cardco 5 Slot Exp. (C-64) 55.95 
Data 20 Video Pak 80 (C-64) 139.00 
Data 20 8K Display Mgr. (VIC 20)119.95 
OK Display Mgr (40/80) (VIC20) 79.95 
Zenith 12" Green Monitor 102.00 
Zenith 12" Amber Monitor 125.00 
Brother/Dynax DX-15 
(Letter Quality) 
C Itoh Prowriter 8510AP. 
Gemini 10X 


71.95 
89.95 
31.95 


485.00 
Call 
Call 


Write or call for FREE CATALOG. TO ORDER: CALL 1-714-643-1056 
8:00 A.M.-6:00 P.M. PST Mon.-Sat. or send check or 
credit card number, signature and expiration date. Please include phone number. 
CENTURY MICRO PRODUCTS 
P.O. Box 2520, Mission Viejo, CA 92690 
Visa/Mastercard add 3%. Personal checks allow 2 weeks to clear. CA residents add sales tax. 
Shipping and handling add $3.00 (hardware extra). Prices subject to change. 
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“In The Chips” requires the player to 
make decisions involving research and 
development, manufacturing and 
marketing. 


develop up to five products— 
Zurn, Chips, Pipes, Astro, or 
Xatar—at a cost of $5000 each. 
Then you move to your produc- 
tion plant and decide how much 
of each product to manufacture 
at a unit cost of $10. Next, you 
move over to the accounting 
division and set up your pricing 
policies. Last on the list is adver- 
tising. If you have any cash left 
over, spend it here, for unadver- 
tised products don't fare too 
well in this market. 

The results of your first quar- 
ter depend on the relationship 
between your product line, pro- 
duction, and advertising and 
those of your competitor. If 
you're each selling Chips at the 
same price, the company doing 
more advertising will sell more. 

After examining the ledger 
sheets, you go to work on the 
next quarter. Although you'll be 
in the red after the first quarter, 
you'll be able to use the income 
from first-quarter sales for 
further product development, 
production, and advertising. As 
you make your production deci- 
sions during the second and 
succeeding quarters, the display 
will show you how many units 
of each product you sold and 
at what price you sold them 
during the preceding quarter. 
Understanding and acting on 


this information is essential if 
you hope to avoid bankruptcy. 


Standard Game 


Lasts Two Years 


The length of play in In the Chips 
can be set by the players. A stand- 
ard game is eight quarters (two 
years), though the program per- 
mits games of up to twenty quar- 
ters. Aneight-quarter game takes 
about thirty minutes to play. 

The best strategy seems to 
be to spend all of your available 
cash on production and adver- 
tising, and hope that your prices 
are better than those of your 
opponent. Keep in mind that 
the other player is pushing the 
same four products you are. 

This is head-to-head competition 
on the store shelves. 

If things don't go well for 
you, the game may come to an 
early end when you fall into debt 
and can't raise enough capital to 
continue production. You'll be 
forced to sell off your inventory 
at a loss and the game will be 
awarded to your opponent. 

Under normal conditions, 
you can't set prices at below 
production cost. However, one 
option permits you to cut prices 
as much as you like in an attempt 
to corner the market and force 
your competition out of business 
through lack of sales. 


Getting Around The 
Game 

The game is played with a joy- 
Stick. You are represented on 
the screen by a construction 
worker-type fellow in blue over- 
alls and a red hardhat. Using the 
joystick, you move him from 
building to building on your 
business site. Once in a building, 
you use the joystick to change 
the numbers on the production 


Comm-File. 


You deserve it. . .so does your Commodore 64!* 


COMM-FILE is a powerful data- 
base program that eliminates 
multiple data files and turns 
them into one organized and 
concise information manage- 
ment system. Offering extreme 
ease of use and tremendous 
versatility, COMM-FILE can 
maintain reports, records, form 
letters, invoices, listings, mailing 
addresses and any other infor- 
mation vital to your business' 
proficient operation. 


COMM-FILE combines Extensive 


“Commodore is a registered trademark of 
commodore Business Machines. 


Data Capacity. . . Flexible User- 
Designed Files and Fields. . . 
Complete Mathematical Cal- 
culation Abilities. . . Powerful 
Search and Sort Control. . . File 
Merge Capability. . . Advance 
Text Editing Features. . . and 
Custom-Designed Printer For- 
mats. ..all to bring maximum 
efficiency and effectiveness to 
any business! 


52), TWARE 
P.O. Box 948, Waterbury, CT 06720 
203-621-9361 


| No Foolin' Around 


INSTA-WRITER 


The Commodore 64 is your first “real” 
computer. So, it stands to reason that 
the software you use be real too. And, 
useful. : 


The INSTA series productivity 
software is just that — real and useful. 
With our tutorial manuals and HELP 
SCREENS we actually teach you what 
word processing, spreadsheets and 
graphs are all about. 


Games are fun....for foolin around. 
INSTA is for real. 


iN 


Commodore 64 is a 
trademark of Commodore 
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and price ledgers in much the 
same way that you add your 
initials to the vanity board of an 
arcade game. It takes a little time 
to understand exactly how to 
move around the board and what 
to do in each building. But once 
you catch on to the rules, things 
go quite smoothly. In the Chips 
features a demo mode in which 
the computer plays a game with 
itself. Though the demo moves 
rather quickly, studying the com- 
puter's moves can help you un- 
derstand the game. 

Asan opponent, the com- 
puter seems fairly static, After 
you've played a few times, the 
computer's business plan be- 
comes fairly obvious. Once you 
understand how the computer 
behaves, it becomes relatively 
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easy to beat it. Though I haven't 
had much chance to play against 
live competition, I find that con- 
siderably more unpredictable 
and challenging. 

Playing the game fairly re- 
quires a bit of self-control on the 
part of both players. You should 
agree not to watch the other 
player set his price and produc- 
tion levels, and you should re- 
frain from studying each other's 
balance sheets. 


Learning About 
Business 

In a very general sense, In the 
Chips simulates the business 
world. All activity is directed 
toward research and develop- 
ment, production, advertising, 
and marketing. The control you 
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ORDERS E “800-638-26 1 7 Kya oeio 


Information and in Ohio 1- 216-758-0009 ` 


1541 Disk Drive $219 
-$ 


WORD PROCESSING 
Word Pro 3+ with speller 


DATA BASE MANAGERS 
Delphi’s Oracle... 5 
Mirage Concepts. 


Sat. - 10 am - 5 pm 


1702 Color Monitor 
$ 59 1525 Printer 30 cps. 
$159 1650 Auto Mode 


HOME FINANCES 
Home Accountan: 

FCM 
Tax Advantage. 


MONITORS 

BMC green screen.......... 

BMC amber screen........ $ 

BMC composite color....$219 

PRINTERS 

Gemini 10X with Cardco 
interface.. 

Gemini 15X. 

SPECIALS 

Koala Pad Touch Tablet 

.5 


Smart 64 Terminal.. 
Micro Pak Paper... 
Disk File 70..... 


We carry a complete liny of Quality Commodore related products including those by: Timeworks, Spinnaker, Epyx, Sierra, 
HES and Cardco. Even if not listed, we probably have it, at the lowest price possible. SEND FOR OUR CATALOGI 
MOST ORDERS SHIPPED WITHIN 48 HOURS! All prices include cash discount. VISA/MC orders accepted - add 3.5%. 
C.O.D. orders add $5.00. For quickest delivery send bank check or money order. All sales are final - defective merchan- 
dise exchanged for same product only. Shipping add 3% ($2.50 minimum). Ohio customers add 5.5% sales tax. Prices & 


availability subject to change. 


78 COMPUTE!’s Gazette April 1984 


1309 Boardman- 


Poland Rd., Poland, OH 44514 


have in each of these areas is 
whether or not to spend money, 
but the game makes no attempt_ 
to cover the nuances and subtle- 
ties that exist within each of these 


areas. 

However, In the Chips does 
illustrate the relationships 
among pricing, advertising, and 
sales, and can be used to dem- 
onstrate these concepts. But it 
must be understood that there’s 
more to business than is por- 
trayed here. 

The financial summary pro- 
vided at the end of each quarter 
contains plenty of grist for a dis- 
cussion about the ways of busi- 
ness. The summary includes two 
parts: the balance sheet and an 
income and operating statement. 

The balance sheet shows 
how much cash you have, how 
much capital is tied up in inven- 
tory, your investment, and fi- 
nally, the bottom line. 

The income and operating 
statement details the activities of 
the preceding quarter. This state- 
ment displays the amounts spent 
on advertising, production and 
development, and the amount 
earned in sales. Expenses are 
displayed in red and earnings in 
blue, graphically demonstrating 
income and outflow. 

In the Chips is an entertaining 
game, and it’s designed to be 
educational. It cannot be played 
successfully without first under- 
standing the concepts involved, 
then thoughtfully applying 
them. But for anyone old enough 
and interested enough to learn а 
bit about business, In the Chips is 
a painless way to do it. 
In the Chips 
Creative Software 
230 East Caribbean Drive 
Sunnyvale, CA 94089 
(408) 745-1655 
$29.95 


Beach-Head 
For The 64 


Shay Addams 


Most computer war games in- 
volve moving little units of your 
army around a grid super- 
imposed on an onscreen map— 
not the most action-packed way 
to fight a war. Beach-Head, how- 
ever, puts you right in the thick 
of things, facing enemy ships 
and planes head-on. It's a one or 
two-player game whose object is 
to win a naval victory, then move 
inland to knock out the enemy 
fortress of Kuhn-Lin. There 
are six different phases in the 
campaign, each presented with 
finely detailed and colorful high- 
resolution graphics. 

As the game begins, you get 
an overhead view of your ten- 


Tired of playing games? 
Learn to program with. . . 


BAS 


A TUTORIAL. 


On your Commodore 64* 


BASIC, A TUTORIAL introduces 
you to the essential elements of 
programming your Commodore 
64 in the BASIC language. Every- 
thing from keywords and state- 
ments to data handling and 
printing...and so much more! 


Although a serious program for 
those serious about computers, 
BASIC, A TUTORIAL makes 
learning fun for even the young- 
est computer "whiz" through 
imaginative graphics and hands- 
on programming experience. 
Each BASIC lesson is presented 
on the monitor screen and in the 
manual for self-paced learning 


*Commodore is a registered trademark of 
Commodore Business Machines. 


both at and away from the 
computer. And, each BASIC pro- 
gramming technique is followed 
by interactive, short examples 
for further understanding of the 
BASIC language in use. 


BASIC, A TUTORIAL helps you 
truly understand and use your 
computer to its fullest. Isn't that 
more challenging than “just 
playing games'! 

For more detailed information 
and the dealer nearest you, 
write or give us a call. 


P.O. Box 948, Waterbury CT 06720 
203-621-9361 


We know. You've been looking 
everywhere for 64 software, INSTA's 
interactive line of software is just a 
phone call away. 


Imagine, specially designed software 
that "talks" to one another. Your home 
budget created with CALC instantly 
becomes a GRAPH. And your club 
membership list with addresses and 
monthly dues quickly becomes a form 
letter, printed over and over again, 
automatically, for each member. 


So, no more lookin' around. INSTA is 
here now! 


ship fleet, represented by four 
white dots floating in the ocean. 
On the left, a long stretch of 
beach reveals a narrow entrance 
to the bay. The fortress can be 
seen blinking in the lower-left 
corner, and the enemy fleet lies 
at anchor in the harbor. 

Your first decision is strate- 
gic: Steam straight into the har- 
bor, or try to sneak up on the 
enemy by approaching through 
a secret passageway into the 
bay, located further up the 
coast. 


Guide The Fleet н 
Through Mines And A| INSTA 
Torpedoes ОСЕ 
If you steer your fleet into the - Шыл 2158 Hathaway Š 


hidden entrance, another screen 
appears to show a wide, round 
underground lake strewn with 
mines. You must maneuver your 
ships one by one across the lake 


MICROSCI 


Commodore 64 is a 
trademark of Commodore 
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and out the exit at the upper-left 
side of the screen. This isn't as 
easy as it sounds, because enemy 
torpedoes zip across the lake 
erratically. But you'll face fewer 
enemy planes in the next phase 
by taking this tack. 

Either way, your ships enter 
the harbor, where the display 
changes to a first-person "you- 
are-there" scene: A huge aircraft 
carrier and four other enemy 
ships are seen at fairly close 
range. 

Propeller-driven fighters 
take off from the distant carrier, 
and the droning of their engines 
gets louder as they approach. 
Appearing first as tiny dots on 
the horizon, they quickly grow 
into finely detailed planes that 
spit machine-gun fire from their 
wing tips, then veer off authen- 
tically instead of passing over- 
head. The only evidence of your 
own weaponry are the tips of a 
pair of barrels whose elevation 
and horizontal positioning can 
be controlled with the joystick. 


Unparalleled 
Animation 


The three-dimensional sensation 
achieved in this sea-to-air battle 
is unparalleled. It's almost like 
being in the middle of a John 
Wayne movie. Another unusual 
effect involves the trajectory of 
your gunfire. The shells don't 
blast a straight line to the on- 
coming target, but describe a 
true arc, rising and falling in a 
smooth motion. When an enemy 
plane is hit, the explosion looks 
like comic book art rather than 
the flashing bursts typical of 
most games. 

Each plane that manages to 
get past you does a little damage 
to one of your ships. The current 
damage is displayed at the bot- 
tom of the screen, and when it 
reaches a certain level, one of 
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An enemy fighter is shot down in the 
opening scenes of Beach-Head. 


your ships will be destroyed. A 
red surveillance plane flies over 
occasionally; it's worth 1000 
points. Shoot down enough 
enemy planes, and the carrier 
tries to escape by sailing off the 
left side of the screen. 


Calculating Your 
Broadsides 

This brings up the ship-to-ship 
battle. The shrill whistling of 
incoming shells alerts you before 
they hit, sending up tall white 
plumes when they splash in the 
water. After you fire a shot, sev- 
eral seconds elapse before it 
smashes into a ship or lands in 
the water. You can't fire another 
shot until the first one lands. At 
the bottom, a read-out displays 
your guns' current elevation. 
When one of your shells hits, a 
little range finder tells you how 
close you were to hitting the 
other ship. 

It might say “10.5 degrees 
long" for instance. Each time the 
joystick is pushed forward, the 
guns are elevated half a degree. 
This means you have to do some 
quick mental calculations to de- 
termine how much to change 
the guns' elevation on the next 
shot. Pressure builds while 
you're trying to subtract 10.5 
from a current elevation of 77, 
but it’s worth it when you see 
the enemy ship sink slowly be- 
neath the waves after you score 
a direct hit. 


Attacking The Beach 


Sink all the ships, and the over- 
head view reappears so you can 
steer your fleet to the beach. 
This scene puts you in the 
driver's seat of a small tank that 
must weave through a series of 
closely placed walls and mines 
while you blast away at gun 
emplacements. The higher your 
score when you reach this scene, 
the more tanks will be lined up 
as reserves. 

Once in motion, you can't 
turn back. The scenery scrolls by 
and there's no way to change 
your speed. It's a do-or-die situ- 
ation. Make it across the beach 
and you'll face the Kuhn-Lin 
fortress and its unerringly accu- 
rate cannon. 

It sits atop a big brown hill, 
where you immediately see a 
small white window. You have 
to put a shot through it. It turns 
black when you hit it, then 
another appears. Ten windows 
must be hit in order to demolish 
the cannon, which slowly aims 
down at you while you're 
popping shots at the windows. 
It never misses; the only way to 
nail it is to rely on a force of sev- 
eral tanks, each of which must 
hit several windows. 

The sight of the cannon 
exploding and a little white flag 
waving from the remains of the 
fort is another visual plus that 
makes this shoot-em-up one of 
the best of its kind for the Com- 
modore 64. You can choose from 
four skill levels and save high 
scores to the disk, and the pause 
feature is convenient when you 
want to call a temporary truce. 


Beach-Head 

Access Software 

925 East 900 South 

Salt Lake City, UT 84105 
(801) 532-1134 

$34.95 


If you want to stay ahead of the personal computing to trade-offs to ultimate success. 


revolution... Telecomputing with Your IBM. How to link up with dis- 

... Welcome (о COMPUTE/'s PC & PCjr! tant computers over ordinary phone lines, access infor- 

This exciting new magazine from COMPUTE! takes mation services, even do office work at home with your 

you inside the PC and the incredible new PCjr to bring own machine! 

you inside information you'll find nowhere else. Music and Graphics. How to play songs and create 
You'll discover how to get the most computer power sound effects with your PC or PCjr. Programs to gener- 

for your money. At home. At school. At work. With easy- ate impressive hi-res graphics and computer animation. 


to-run programs. Challenging 
rojects for advanced users. А 

Brand new sound and graphics From the publishers of COMPUTE! 
applications. Plus some of the 
most exciting computer 


LI 
functions outside of the top- A n ПС n 
secret research labs! n OU | g 
We’ll help you decide what * 
to buy With independent 
evaluations of hardware, e | | agazine 


software and peripherals. 


Comprehensive reviews of 
new products as they're intro- a a es VOU 


duced. Hard-nosed evalua- 


tions of each machine's . в 
strengths апа weaknesses. inside the | 
COMPUTE!s PC & PCjr 


will keep you on the leading . 
edge of personal computing PC qnd the PC [ 
like no other publication can. . 


Here are some of the features 


you can look forward to: 

Welcome to the PCjr! À com- 
plete introduction to IBM's 
newest personal computer, 


COMPUTE's 
and a fascinating peek at the 


Pee ЖЕГІ 
8088 microprocessor — t le P & P< г 
tiny-but-talented brain of 


PCjr. For Owners and Users of IBM Home Computers 


Designing PCjr — Thi 
Story. PCjr's creato 
they designed th 


$24 for the first 12 
issues—a 32% saving 
off the cover ргісе | 
What's more, I r 
the right to cance 
any time for a fu 
pro-rata refund. | 


MAIL TO: 


COMPUTE? 
PC&PCj | 


P.O. Box 974, Farmingdale, NY 11737 


Your First Hour with an IBM. 
How to avoid those opening 
night jitters and get your com- 
puter up and running fast! 
Financial Analysis. Ready-to- 
run programs to help you 
make intelligent investments. 
PC vs. PCjr. Which one is right 
for you? COMPUTE!’s PC & 
PGjr helps you decide! 

PLUS: Programming the func- 
tion keys to suit you. Speeding 
up BASIC without resorting to 
machine language. Tape, disk, 
or hard disk? Buyer’s guides. 
How to take advantage of 
free public-domain software. 
Computing activities for the 
whole family. Reviews. Games. 
Educational programs for 
children. And much, much 
more! 

Subscribe right now and you 
can enjoy special Charter Sub- 
scriber Savings on COM- 
PUTE!’s РС & PGjr — just $24 
for! the first 12 big issues. That’s 
33% off the cover price! 

To start receiving COM- 
PUTE!s PC & PCjx just mail 
the postpaid card in this issue 
or the coupon below today. 


\\ 


OR CALL TOLL FREE 
800-334-0868 
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Lunar Leeper And 
Cannonball Blitz 


Harvey B. Herman, Associate Editor 


I trust that I’m not repeating 
myself too much when I say that 
the real advantage of owning a 
VIC-20 is that you get a real com- 
puter which can also play super 
games. I thought it was a bargain 
at $300 when it first came out; 
now at about $70, it is a steal. 
Any disadvantages—a limited 
memory and a 22-column screen, 
for example—are outweighed by 
its capabilities. 

Recently, I received two 
more cartridge games to add to 
our growing collection. My kids, 
and to a lesser extent the adult 
kids (my wife and I), have had 
a lot of fun with what I have 
dubbed the second generation of 
VIC games. (The first generation 
was largely pedestrian.) 


Lunar Leeper 


“Leepers are cute, 
Leepers are sly, 

It's a game full of dodging 
to shoot up an eye. 


Fly up and fly down 
Forward and back, 
Rescue your men 
before Leepers attack." 


The first two stanzas of the 
poem on the cartridge box cover 
neatly summarize this fast game. 
Your joystick controls a space- 
ship. Your mission: to score 
points by bringing men to safety 
on a cliff and destroying an evil 
eyeball. 

Sounds easy, but of course 
it's not. In level one, you must 
evade one-eyed, froglike crea- 
tures (lunar leepers) which are 
jumping at your ship and shoot- 
ing at you. They will eat you and 
your men if you are not careful. 
When this happens, you are 
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literally sucked into their heads 
to the accompaniment of appro- 
priate sound effects. 

What makes the game diffi- 
cult to master is that the speed 
and direction of your ship are 
controlled by the joystick, with- 
out benefit of brakes. You must 
keep your eye on an inertia meter 
or you might be moving too fast 
to pick up a man. Furthermore, 
you must keep an eye on your 
fuel gauge so you can refuel be- 
fore your fuel runs out and you 
crash. 

This game has features that 
we like to see in all games. It 
Offers a choice of starting levels 
and a pause control. You keep 
moving up in difficulty when 
you have rescued all your men 
or shot all the leepers. There is 
variety. For example, level two 
is completely different from level 
one. In level two you find your- 
self in a cave containing a giant 
eyeball which must be destroyed 
while you dodge the eyeball 
protectors. There is little room 
for error in this convoluted maze. 
A good score requires lightning- 
fast reflexes and little time for 
thinking. 

Lunar Leeper, which is also 
available on cartridge or disk for 
the Commodore 64, is an excel- 
lent game. 


Cannonball Blitz 


“Cannonball Castle, fortress of 
the enemy redcoats, sits high 
atop Nutcracker Hill. It is your 
mission, as a rebel soldier, to 
climb Nutcracker Hill and de- 
stroy the castle. Not so fast, 
though—there are many traps 
and obstacles ... a constant rain 
of cannonballs could cause a 


The ship has rescued a crew member, 
but cannot reach the fuel pod. 


fatally large headache." 

The above blurb (from the 
package) is descriptive of the 
game. You want to get up to the 
top, but the Redcoat, kicking 
rolling cannonballs at you, has 
other ideas. 

The game commences in- 
nocuously enough with a 
serenade of "When Johnny 
Comes Marching Home." Then 
the balls come rolling down at 
you and you don't have much 
time to think. You can jump 
over them if you're quick, or you 
can use falling cannonballs and 
a seesaw to propel up one vertical 
level. A balloon helps you ascend 
the final step to the Redcoat's flag. 

Like other good games, it 
has a choice of levels. If you man- 
age to reach the top and capture 
the flag, you listen to a victory 
song ("This Old Man," for ex- 
ample) and move up a level of 
difficulty. Points are scored by 
jumping over cannonballs, and 
at higher levels, by striking can- 
nonballs with a hammer. 

I found the game very diffi- 
cult and never passed level one. 
So did my kids at first, but now 
one of them claims he has mas- 
tered it and can win almost every 
time. Keep that in mind if you 
have expert players who bore 
easily once they get the knack. 
Lunar Leeper 
Cannonball Blitz 
Sierra On-Line Building 
Coarsegold, CA 93614 


(209) 683-6858 $29.95 each @ 


*Atori is a trademark of Atari, Inc. ©Copyright 1983 BRAM inc. 
**Commodore 64 is a trademark of Commodore Business Machines, Inc. ce 


Scrolling 3D graphics, on-line instructions, one or two player cooperative, seven different dungeons, 74 
different screens, high score save to disk, full sound and color, zombies, poisonous snakes, giant 
spiders, evil orbs, scrolls, talismans, magic spells, lost crowns and spectacular underground scenery. 


A fast action arcade fantasy for 


Commodore 64** and Atari* computers Disk and Tape 


— as 
18779 Kenlake Place N.E. ; 
Seatile, Washington 98455 By Mike Edwards from BRAM inc. $34.95 


(206) 486-8428 Commodore version by Henry Bolley 


SIMPLE ANSWERS TO COMMON QUESTIONS 


TOM R. HALFHILL, FEATURES EDITOR 


Each month, COMPUTE!’s GAZETTE will tackle some 
questions commonly asked by new VIC-20/Commodore 
64 users and by people shopping for their first home 
computer. 


Q. What is the meaning of the decimal num- 

bers in BASIC 2.0, BASIC 5.1, etc.? Do the terms 
“extended BASIC” or “enhanced BASIC” have a 
real, definable meaning? Or are they mostly ad- 

vertising puffery? 


A. In computerese, decimal numbers tacked 
onto names of products—usually programs—in- 
dicate the current version of the product. In other 
words, they denote the product's current state of 
revision. À word-processing program named 
WordMangler 2.2 is a more current version than 
WordMangler 1.5. The higher the number, the 
later the revision. 

As far as I’ve been able to determine, there 
aren't any formal rules governing the use of these 
numbers. Logically, you would think that the 
first version of a program would always be labeled 
1.0, right? But often new programs appear on the 
market with a postscripted 2.0 or even 3.5. Ap- 
parently the earlier-numbered versions were not 
fit for public consumption and never made it out 
of the programmer's workshop. 

In lieu of formal rules, a few general conven- 
tions seem to be followed. If a revision is more or 
less minor—to fix a small bug, for example—the 
number is incremented by only a fraction, such as 
2.0 to 2.1. But if major changes are made—perhaps 
to incorporate significant new features, or adapt 
the program to another computer—the number is 
moved up a whole notch, such as 2.0 to 3.0. 

The same conventions are followed when 
numbering programming languages such as 
BASIC. (BASIC itself, of course, is just a large 
program written in machine language.) You've 
probably seen these revision numbers when 
writers refer to various versions of Commodore 
BASIC. The very first Commodore computer, the 
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PET (Personal Electronic Transactor); came out in 
1977 and had a version of BASIC known today as 
Original ROM BASIC (so named because the 
BASIC was stored in ROM—Read Only Memory). 
Later, this BASIC was revised and became known 
as Upgrade ROM or BASIC 2.0. The BASIC lan- 
guage built into the VIC-20 and Commodore 64 is 
essentially BASIC 2.0. 

Improved models of the PET, known as the 
4032, 8032, and SuperPET, have an even better 
version called BASIC 4.0. Among other things, 
this BASIC has more efficient garbage collection 
and built-in disk commands. Compare these two 
procedures for deleting a file off a diskette in disk 
drive 0. 


In BASIC 2.0: 


CLOSE 15:OPEN 15,8,15,“SCRATCH0:filename”: 
CLOSE 15 


In BASIC 4.0: 
SCRATCH "filename" 


What's more, BASIC 4.0 even asks, "Are you 
sure?" before going ahead and scratching the file. 
That's where the terms "extended BASIC" or 
“enhanced BASIC" are applied. In effect, BASIC 
4.0is an extended or enhanced version of BASIC 
2.0. It's easy to see how extended commands can 
make a computer easier to use. 

Unfortunately, there are no absolute, defin- 
able meanings to the terms "extended" or “еп- 
hanced” when applied to various BASICs. Pre- 
sumably, these terms indicate that the BASIC 
does indeed have more advanced commands, but 
remember that one computer's extended BASIC 
may be no better than another computer's stand- 
ard BASIC. For example, the extra sound and 
graphics commands found in many extended 
BASICs sold for the VIC and 64 are built into the 
regular BASICs in some other home computers. 
To avoid being misled by advertising puffery, ask 
to see a list of the extra commands so you can 
judge for yourself. If possible, try out the com- 
mands before buying the BASIC to see how useful 
they really are. 


AT LAST!!! A REAL FLIGHT SIMULATOR!!! 


MicroProse Software 


THE BEGINNER’S CORNER 


C. REGENA 


MATCH- EM 


A question I am often asked is how to convert pro- 
grams for one computer to versions for another. 
Although published program listings for the VIC 
and 64 were at first sparse, they aren't anymore. 
The need for conversion is less important. However, 
you sometimes find a program written for another 
computer that you wish you had for yours. 

Conversion isn't that difficult. The main BASIC 
commands are the same for most all microcom- 
puters, and the logic is the same. The major differ- 
ences in the programming commands for micro- 
computers are the sound and graphics commands. 
Each brand of computer requires a special method 
of programming sound and graphics. I have found 
it easier not to strictly convert these commands, but 
to rewrite sound and graphics for each particular 
computer. 

I have had quite a few requests to convert 
^Match-Em," originally published for the TI-99/4A 
in the April 1983 issue of COMPUTE!. Here it is for 
the VIC and the 64. 


How To Play Match-Em 


Match-Em is a simple matching game designed 
for young children. The screen displays 16 
squares, each with a different letter. Press the 
letters on two of the squares to try to match the 
shapes hidden behind those letters. If you suc- 
cessfully "match-'em," the shape will be drawn 
at the bottom of the screen, and you will not be 
able to use those squares again. If you choose a 
square which has previously been matched, in- 
stead of a shape you will see rows of X marks. 

There are eight pairs of shapes to try to match. 
The game is over when all eight pairs have been 
discovered. The object is to score as low as pos- 
sible—you get one point for each guess. 

If you wish to stop the game at any time, 
press Q to quit. The placement of all the shapes 
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PRESS 2 LETTERS 6 


The goal is to find the matching pairs in "Match-Em," for 
the VIC and 64. 


will be shown. After each game you have the op- 
tion of trying again. If you press Y for yes, the 
shapes are scrambled in a different order, and the 
score is reset to zero. If you press N for no, the 
program ends. 

Feel free to change the graphics. I used some 
shapes made up from the graphic shapes on the 
fronts of the keys. You can get fancy and create 
sprites on the 64 if you wish. And you can make 
up different designs or even animals to match. 

The principles of a matching game are the 
basis for many educational games. You can use 
the same general logic to develop matching games 
for a variety of subjects. For example, instead of 
shapes you could match a capital letter with a 
lowercase letter. Try matching a picture with its 
beginning letter. Match parts of compound words, 
or perhaps homonyms, antonyms, or synonyms. 
In geography, match states and capitals or, 


Food for Thought. 


Real computing at appetizing prices. 


64 РАК:" A self-teaching sampler 
package of 10 menu-driven programs. 
Inventory 64™ An easy-to-use Ideal as an introduction to computing. 
menu-driven program that lets you Or compute your life expectancy, 
track complete and complex invento- your mortgage payments, even learn 
ries. Pinpoint locations, vendors, the language of the deaf, plus a lot 
units of measure. Update prices, re- more. Only $19.95* on tape; 

orders, sales, entire stocks. A power- — " $24.95* on disk. 

ful tool for your home computer at 

only $29.95* on disk. 


COMPUTER SOFTWARE ASSOCIATES 


ZYT TT 
баг 


PractiFile™ A fully professional file pu 
manager for your Commodore. à ч 
PractiFile can handle mailing list ч 


entries by the thousands. You can 
change records, numbers, methods 
of filing, and a great deal more. Plus, 


ши Total Health™ The fun way to keep 
PractiCalc™ 64. The most powerful fit. Stay on top of your daily intake 
spreadsheet available for a home and outgo of calories. Balance your 
it's easy to use. Only 954.95" on disk. computer—at the least cost. Track daily diet and graph your progress— 

investments, inventories, expenses. all tailor-made to your body, past, 

Project profits. Make charts. Keep present, and future. It's like having a 
mailing lists. Sort alphabetically or health spa in your home for only 
numerically, instantly. An incredible $24.95* on tape; $29.95*on disk. 
value at $49.95* tape; $54.95* disk. 


Now you can do real, honest-to-goodness computing at computer-game prices. Computer Software 
Associates brings you hard-working software that makes your work easy. (While its easy on your budget.) 
All programs are easy to work with right on the screen, from self-teaching instant software that tracks your 


vital statistics to potent programs to track inventories and profits. y COMPUTER 


Of course, if its games you want, we've got them too. But if you're look- 
ing for home computer power with real brainpower, look no more. Now GS SOFTWARE 


you can play for keeps. 
Exclusively distributed by Micro Software International, Inc. • The Silk Mill, 44 Oak St., Newton Upper Falls, MA 02164 • (617) 527-7510 


*Prices are suggested retail; actual retail prices may vary. ©1984 Computer Software Associates, Inc. Commodore 647 trademark of Commodore Business Machines, Inc. 


perhaps, rivers with countries or countries with 
continents. In history, match a date with a histor- 
ical event. In mathematics, match a problem with 
its answer. 


How The VIC And 64 Versions 
Work 


I first wrote the 64 version of this game, then com- 
bined lines and changed the graphics and sound 
commands for the VIC version. To aid my program 
explanation, I kept the VIC line numbers consist- 
ent with the 64 version. 

Line 1 defines the border and screen color 
combination, clears the screen, and defines the 
printing color. 

Line 10, a DIMension statement, is used to 
reserve array space for 16 elements each in A, B, 
C, and P. A and B keep track of the eight shape 
numbers. C is the color number for a particular 
square on the screen. P is a position number used 
in drawing the graphics for a particular square. 

Lines 20-80 print the title screen and instruc- 
tions. Line 90 reads the values for the position 
and color of each square from the data in lines 
100—130. In line 140, CC is defined as a number 
that relates the screen memory map with the color 
memory map. A$ and B$ are used to print the 16 
red and blue squares. 

Lines 150-160 turn on the sound and define 
variables used to play sounds—a beep to signal 
the player's turn to press two letters, an ^uh-oh" 
sound for no match, and an arpeggio for a correct 
match. 

Lines 170—180 wait for the player to press the 
f1 key to start the game. To type this line, press the 
f1 key between the quotes in line 180. You may 
choose a different key to be pressed if you prefer. 

Line 190 clears the screen, and in the 64 ver- 
sion line 200 changes the screen to white. Lines 
210—230 print the red and blue squares on the 
screen. Line 240 prints the letters on the squares, 
then line 250 prints the Q option. 

Lines 260-300 are my way of arranging the 
shapes. Each of the shapes is numbered from 1 to 
8. The B array can be considered a screen with the 
shapes in order (1-2-3-4-5-6-7-8-1-2-3-4-5-6-7-8). 
The A array is formed by choosing one of the B 
elements randomly. After a B element has been 
chosen, it is set to zero so it cannot be chosen 
again. Line 300 then redefines the B array to be 
the same as the A array. If the player presses Q or 
ends the game, the B array is used to see the orig- 
inal position of all the shapes. 

Lines 310-330 define random colors for the 
shapes, making sure the shape color is not white, 
red, or blue. The score (SC) and number of correct 
shapes (S) are initialized to zero. S is used to de- 
termine the position to print the shape at the bot- 
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tom of the screen when it is correctly matched. 
Line 340 POKEs color onto the screen where the 
score will be printed. 

Line 350 prints the message to press two let- 
ters. Lines 360-370 increment and print the score 
at the bottom right corner of the screen. Lines 
380—390 create a beep to indicate to the player that 
itis time to press two letters. 

Line 400 scans the keyboard to see which 
letter the player presses. If no key is pressed, the 
POKE statements blink the dash for the letter on 
the screen. Lines 410—420 make sure that the letter 
pressed is between A and Q and that all other 
keys pressed are ignored. The letter pressed is 
printed on the screen, replacing the dash. R1 is 
the first letter pressed, and R2 is the second letter. 
Line 430 has the computer branch if the letter Q 
has been pressed. 

Lines 440-470 print the shape corresponding 
to the square chosen. If the square has previously 
been matched, A will be zero and X marks will be 
printed instead of a shape. In line 470 the ON- 
GOSUB branches to the appropriate subroutine 
to draw the particular shape. GOSUB 780 colors 
the shape. 

Line 480 sets the position for the second dash, 
then line 490 blinks the dash while waiting for the 
second letter to be pressed. Lines 500—570 are 
similar to lines 410—470, which print the shape of 
the second letter chosen. 

Lines 580—640 play the “uh-oh” sound if a 
match is not made. Lines 650-680 play an arpeggio 
if a match is made. Lines 690—700 print the shape 
at the bottom of the screen, then line 710 sets the 
A elements to zero so they-cannot be matched 
again. Line 720 branches if all eight shapes have 
been matched and the game is over. 

If the game is not over, line 730 waits until 
the player presses the space bar to continue 
playing. Then lines 740—760 “cover” the squares 
and replace the previous letters with dashes so 
line 770 can branch back to the beginning of the 
choosing procedure. 

Lines 780-800 contain a subroutine to color 
the shape after it has been drawn. A subroutine 
in lines 810—840 replaces the shape on the screen 
with its original red or blue square and cor- 
responding letter. Lines 850-1070 contain the 
subroutines to draw the eight shapes. 

Lines 1080-1100 contain the procedure if a 
player has correctly matched all eight shapes. The 
message to press two letters is cleared, then some 
random tones sound to signal the end of the game. 

If a player presses Q or if the player has 
matched all eight shapes, lines 1110-1130 show 
all the shapes for the 16 positions on the screen. 
Lines 1140-1170 print the option to try again, and 
the program branches appropriately. 

See program listings on page 140. € 


BUEH 


ШЕНЕП 


LJ RS232 Adapter 
for Commodore 64 


QUALITY COMPUTER PRODUCTS 
FOR APPLE AND COMMODORE 


Jameco's 10th Anniversary 1984 Catalog is Now Available 


ЕЕ Тһе JE232CM allows connection of 
standard RS232 printers, modems, 
etc. to your С-64. А 4-pole switch 
allows the inversion of the 4 control 
lines. Complete installation and орег- 
ation instructions included. 

+ Plugs into User Port Provides Stan- 
dard RS232 signal levels - Uses 6 
signals (Transmit, Receive, Clear to 
Send, Request to Send, Data Terminal 
Ready, Data Set Ready). 


JE232CM...... $39.95 
for Commodore 64 


JE520 Series 


VOICE SYNTHESIZER 
FOR APPLE AND COMMODORE 


Add speech capability to your Apple Il, II+, /le*, 
Commodore 64 or VIC-20 computer with JAMECO’s 
JE520 Series Voice Synthesizer. Speech — the most 
effective means of communication available to man 
— is now immediately available for your computer. 


GAME PADDLES 


JSD Atari 

Driver (Single). . . . . $2.95 
JSP Atari 

Paddle (Double). . . . $2.95 
CSP Commodore 
РайШев........... $4.95 


(Atari Paddles modified for VIC20 & С-64) 


Applications 
+ Education Entertainment  - Instrumentation 
+ Games -Теіесоттипісабопв «Handicap Aids 


JES20 Features 

* Моге than 260 basic words, prefixes and suffixes, which allow 
the formation of well over 500 total words. 

* Allows music graphics and speech simultaneously. 

* Programs in BASIC and/or assembler. 

* Very understandable and realistic male voice. 

* Built-in amplifier, speaker, volume control and 
audio jack. 

* Plug-in user-ready with complete documentation 
and sample software. 


The JE520 will plug right into your computer and be 
talking in minutes. It produces a very clear, 
natural male voice. The outstanding speech 
quality is produced using National Semi- 
conductor's Digitalker'™ speech processor 

IC with 4 custom memory chips. 


JE520AP 


Case Size: 
7¥%4"LX3%4"Wx156"H 


Coming soon: 


Vocabulary Expansion to 
over 1000 words. 


JE520CM For Commodore............. $114.95 
JE520AP For Apple................... $149.95 


JE520CM 


CABLES 


RS232 Type 
ОАЕ EL peius 
CDB25P-4-P J 4 $13.95 
CDB25P-10-P J 10" 16.49 
CDB25P-4-S le 4 13.29 
CDB25P-10-S B 10! 15.49 


“Centronics” Туре 
Part No. Style Length Price 
CEN36M-5-M J 5 $19.95 
CEN36M-15-M J 15' 26.95 
CEN36M-5-F L 5 2295 
CEN36N-15-F. i" ie 28.95 


IBM PC Parallel Printer 
Adapter Type 
(00825 Male to Centronics Male) 


Part No. Length Price 
CDB25P-5-CEN36M. 5 517.95 


CDB25P-15-CEN36M 15' 22.95 


Style J Male to Male 
Style L Male to Female 


We stock over 200 different cables. If you don't 
see what you need, please call 


- 514" Diskettes 


SSDD = Single Sided Double Density 


80-Column plus 64K RAM 


DSDD = Double Sided Double Density for your APPLE //е* 
ULTRA MAGNETICS рне 
Part No. Description Boxed Price 
UM51401 SSDD with Hub Ring 10 $24.95 
-T UM52401 ӘП with Hub Ring | 10 3295 
5К (Е5КЕІ) 
E SK1D SSDD with Hub Ring 10 $20.95 
к= SK2D DSDD with Hub Ring 10 26.95 


prices available оп request. 


All diskettes аге soft-sectored and have hub rings. Bulk 


For: Apple II, + and /le* 
Atari 


Commodore 64, VIC-20 
IBM PC, PC Jr... 


Use SSDD 


Now you can double the memory capacity and get 
an 80-column display format for your APPLE //е* 


$10.00 Min. Order - U.S. Funds Only 
Calif. Residents Add 672% Sales Tax 
Shipping - Add 5% plus $1.50 Ins. 


3/84 


Send $1.00 Postage for your 
FREE 1984 JAMECO CATALOG 
Prices Subject to Change 
Send S.A.S.E. for Monthly Sales Flyer! Will Call Service BAM to SPM 


1355 SHOREWAY ROAD 
BELMONT, CALIFORNIA 94002 
Phone Orders Welcome (415) 592-8097 

Telex No. 176043 


computer at an affordable price. Just plug the 
JE864 card into your APPLE* and expand your dis- 
play to 80 characters per line. Perfect for word 
processing. The JE864 also features 64K bytes of 
additional memory to allow programming not pos- 
® sible with standard APPLE /le* computers. Complete 


ГЕКЕ) documentation included. 
VISA° 


Board: High density board design squeezes 64K 
bytes of RAM onto a 2%" x 4%" board * Fully tested 
to assure proper operation. 


Uses: Word processing — displays 1000 more 
characters per screen * Extra memory allows run- 
ning of extremely large programs : Ultra High Reso- 
lution Graphics capability. 


JE864 ........... $149.95 


Dealer inquiries invited. For Technical Information, call (415) 595-3994 


Numeric/Auxiliary 
Keypad for your 
APPLE Ile* 


The JE614 is a newly introduced 
numeric/auxiliary keypad for the 
APPLE Ле." It offers the flexibility of a 
10-key pad and the convenience of 
23 directly accessible functions. 
Screen manipulating functions make 
word processing a snap and cursor 
controls make the keypad ideal for 
VisiCalc** users. The JE614 Keypad 
is housed in a durable metal enclo- 
Sure and is color-coordinated with 
your APPLE е computer. Operation 
of the keypad can begin within 
minutes from unpacking. Special 
functions include: Home, Clear, 
Clear to End of Screen, Scroll-Up, 
Scroll-Down, Tab, Delete, Left, Right, 
Up and Down. Each key has auto- 
repeat. Size: 5%" L x 4-3/16" W x 114" 
to 2%" Slope. 


JE614 ...... $89.95 


"APPLE and APPLE lle are registered trademarks of APPLE Computers. 


“VisiCalc is a registered trademark of Visi Corp. Inc. 


| Td dI ESTEE ESTEE 


Little Known 
BASIC Commands 


Todd Heimarck, Assistant Editor 


You probably know how to use BASIC com- 
mands like PRINT and INPUT. But how many 
of your programs contain WAIT, ATN, or 
LOG? These and other seldom used Commo- 
dore BASIC commands can help you do more 
with the programs you write. 

анына ка GE 


When you're speaking or writing, you can choose 
from a smorgasbord of about 175,000 English 
words, not counting proper names. Some have 
been around hundreds of years and are rarely 
used anymore; when was the last time you said 
"yclept" or "soothly"? Others are narrowly de- 
fined technical terms, used primarily within a 
trade or profession. 

As diverse as our language is, there are a few 
words that do most of the work. Linguists estimate 
that if you know just 3,000 English words, you 
are able to understand over 80 percent of what 
you read or hear. 


Expanding Your BASIC 
Vocabulary 

Commodore BASIC is much more limited than 
English or any other natural language. For one 
thing, it contains only about 70 words. And there 
are strict rules of syntax about how you can use 
them. BASIC is not a language for poets. 

But BASIC is similar to English in that there 
are a few workhorse words, common commands 
that are used time and again. 

To get information into the computer, you 
need INPUT, GET, and READ-DATA. To perform 
loops and make decisions, FOR-NEXT and IF- 
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THEN. To put the results on the screen, PRINT. 
Now let’s expand our vocabulary a bit with 
some of the little known commands. 


ABS (ABSolute value) 


ABS determines the absolute value of a number. 
It leaves positive numbers alone and changes 
negative numbers to positive. It may sound rather 
useless, chopping off minus signs, but there are 
some interesting things you can do with it. 

The most obvious application of ABS is in 
financial calculations. When you want to make 
sure that no negative numbers appear in a pro- 
gram, you simply ABS them. Another application 
would be a checkbook register which lists all de- 
posits and checks. Perhaps your program auto- 
matically uses negative numbers for checks, but 
you want to print the list without minuses all over 
the screen. 

ABS can be used to avoid crashes in programs 
using SQR (square root) or LOG (logarithm). 
These mathematical functions and others will 
accept only positive numbers; numbers less than 
zero will cause an error message. 

ABS can also be used in a toggle routine. Let’s 
say you want a variable to switch back and forth 
between two different values. You could use the 
following subroutine: 

1 T-3 

499 REM TOGGLE SUBROUTINE 
500 IF T=3 THEN T=16: RETURN 
510 IF T=16 THEN T=3: RETURN 

Each time you want to toggle, you GOSUB 
500. As you can see, T switches back and forth 
between 3 and 16. But the following routine will 


Five Easy Ways 
To Clean Up Your Finances. 


Н 1 
ipa сору с 


BALANCE 


Vf) on! sr] 


actual screen display 


Chart of Accounts 
*Checkbook Maintenance 


*Detail Budget Analysis 
Summary Budget 


Check Search Analysis 
Prints Checks Income/Expense Mailing List 
Statements 


Net Worth Statement 


Qy 
WC Complete Personal Accountant; 2^ 


Whether you're cleaning up at home or around the of- 
fice, there's NOW a COMPLETE line of money manage- 
ment software that will attend to all the details, while 
letting you see the whole financial picture. The Com- 
plete Personal Accountant's exclusive combination of 
easy to use programs give the wise investor a quick and 
dependable way to control finances and plan for the 
future. 


FINANCE 1 gets you organized with a standard chart of 
accounts adaptable to any situation. The Checkbook 
Maintenance program with full screen editing and special 
*Help' commands let you find any check by any field. 
You can flag tax deductibles, reconcile your bank 
statement, print checks and more. 


FINANCE 2 tells you where your money is, 
where it's going and where it's coming 
from. The Detail and Summary Budget pro- 
grams show exactly where you're spending 
your money. The Income/Expense and Net 
Worth programs provide professional- 
looking statements that can be printed 
with any 80 column printer. 


FINANCE 3 separates the CPA from the 
competition. No other finance package for 
the home or small business gives you Ap- 


programmer'sinstiiuie 


Appointments Calendar 
Payments Calendar 
*Color Chart Package 


VU tneure Exc. 
БЕ 


*indicates function being shown 


*Spreadsheet 
Compatible with 
Finance 1, 2 and 5 


*Income Tax 
Prints forms 
Most schedules 
Uses Finance 1, 2 and 4 


dis ; tll 


pointments and Payments Calendars for scheduling your time and money. 
Few packages offer the ability to chart'each account in color. And only the 
CPA includes a mailing list with a 1200 name capacity*. All reports are print- 
able with an 80 column printer. 


FINANCE 4 lets you determine the "what if's" of your financial future. With 
this easy to learn spreadsheet you'll spend more time making decisions and 
less time crunching numbers. 


FINANCE 5, The Tax Handler", uses your files from Finance 1, 2 and 4 to com- 
plete your taxes in a fraction of the normal time. 


The Complete Personal Accountant" line of money manage- 
ment software is simply the most comprehensive, easy to 
use financial software available anywhere. 


Disk Cassette 
Finance 1 39.95 34.95 
Finance 2 29.95 24.95 
Finance 3 29.95 24.95 
Finance 4 29.95 24.95 
Finance 5 59.95 54.95 


SAVE when you 

purchase Finance 1, 2 

and 3 as a set 79.95 74.95 
Available for Atari 400/800/1200% Commodore 647, 
ІВМ РС” TRS 80 Color™ and Vic 20% 

Prices subject to change without notice. Add $3.00 
for postage and handling. 

Ask your local dealer to see a running demo or call 
1-800-334-SOFT to order direct. 


*Varles according to computer. 


a division of — “ч 


p.o. box 3470, department cg, chapel hill, north carolina 27514 p M 


Сомморове 64 COMPUTER AND SOFTWARE 
(more power than Apple I! at half tne price) S ALE 


$99.°°* "n 36929 


VIC-20 


(a real computer at the price of a toy) 


HAVE BE HAVE 
ТНЕ THE 
e 170K DISK DRIVE $159.00 * BEST 8 LOWEST * 40-80 COLUMN BOARD $59.00 


e TRACTION FRICTION PRINTER $109.00 * SERVICE Bl PRICES * 32K RAM EXPANDER $95.00 


+ COMMODORE 64 COMPUTER $99.50 


SPECIAL SOFTWARE COUPON 
You pay only $199.50 when you order the power- 


VIC-20 COMPUTER $69.50 
This 25K VIC-20 computer includes a full size 66 


ful 84K COMMODORE 64 COMPUTER! LESS the key typewriter keyboard color and graphics keys, 
value of the SPECIAL SOFTWARE COUPON we We pack a SPECIAL SOFTWARE COUPON upperllower case, full screen editor, 16K level Ii 
pack with your computer that allows you to with every COMMODORE 64 COMPUTER- microsoft basic, sound and music, real time 
SAVE OVER $100 off software sale prices!! With DISK DRIVE-PRINTER-MONITOR we sell! floating point decimal, self teaching book, con- 
only $100 of Savings applied, your net computer This coupon allows you to SAVE OVER nects to any T.V. or monitor! 

cost is $99.50!! 


$100 OFF SALE PRICES! $200-$300 sav- 


SOFTWARE BONUS PACK $29.95 ings are possible!! (example) 40-80 COLUMN BOARD $59.00 
When you buy the Commodore 64 Computer Now you can get 40 OR 80 COLUMNS on your 
from Protecto Enterprizes you qualify to pur- T.V. or monitor at one time! No more running 
chase ONE SOFTWARE BONUS PACK for a out of line space for programming and making 
special price of $29.95!! Normal price is $49.95 columns! Just plug in this Expansion Board and 


PROFESSIONAL SOFTWARE 


(40 programs on disk or 24 programs оп 5 tapes). COMMODORE 64 you immediately convert your VIC-20 computer 
Name List Sale Coupon to 40 OR 80 COLUMNS!! List $129. SALE $59.00. 
* 170K DISK DRIVE $159.00 Executive Word You can also get an 80 COLUMN BOARD WORD 
You pay only $259.00 when you order the 170K RA oon a AR 25200 25200 5800 PROCESSOR with тай merge, terminal emulat- 
Disk Drive! LESS the value of the SPECIAL 20,000 Word Dictionary $24.95 $19.95 $14.95 or, ELECTRONIC SPREAD SHEET!! List $59.00. 
SOFTWARE COUPON we pack with your disk Electronic Spreadsheet 589.00 $59.00 $46.00 SALE $24.95 if purchased with 80 COLUMN 
drive that allows you to SAVE OVER $100 off Accounting Басы $59 00 55000453200 BOARD! (Tape or Disk). 
software sale prices!! With only $100 of savings тоа pes 
applied, your net disk drive cost is $159.00. Tape оо 35600 53700 32K ВАМ EXPANDER $95.00 
Total Text 2.6 3 This cartridge increases programming power 
Xn ВАС ТОНЕНІСТІӘНЕЛІН ТЕҢ 9109.00: Word Processor Over 8 times!! Expands total memory to 57K 
JF deluxe line printer th ints 8 1/2 x 11 Tape 544.95 539.00 526.00 (57,000 bytes). Block switches аге оп outside of 
Stata deluxe Ше printer ihat prints ы pisk 52800 гш 32900 cover! Has expansion роп!!! Lists for $199 (OUR 
full size, single sheet, roll or fan fold paper, Total Label 2.6 BEST BUY! р роп 
labels etc. 40, 66, 80, 132 columns. Impact dot Tape $24.95 $18.00 512.00 5 
matrix, bi-directional, 80 CPS. LESS the value of КӨР ета 52995 523043150) 
the SPECIAL SOFTWARE COUPON we pack Helper (Disk) 55900 $3900 52995 60K MEMORY EXPANDER $49.00 


with your printer that allows you to SAVE OVER 


Basic Tutor(Tape/Disk) $29.95 524.95 515.00 
$100 off software sale prices!! With only $100 of 


Sixslot — Switch selectable — Reset button — 
Typing Teacher 


Ribbon cable — CARDCO. A must to get the 


i i 1 i (Tape/Disk) $29.95 524.95 515.00 
ТОСО. appiled youri net printeri cost 1з only Sprite Designer (Disk) $1695 — $1495 51000 most out of your VIC-20 Computer! 
00, Medicinemen (Tape) 519.95 517.95 512.00 
Weather War II (Tape) 51995 $17.95 $12.00 
80 COLUMN BOARD $99.00 Professional Joy Stick 524.95 $15.95 $11.00 8K RAM CARTRIDGE $39.00 
Light Pen $39.95 $19.95 $16.95 Incri mmini 2 1/2 ti Ex- 
Now you program 80 COLUMNS on the screen creases prograi g power imes. Ех: 


Dust Cover $s 8.95 $ 6.95 5 4.60 


(See other items іп our catalog!) 
Write or call for 


Sample SPECIAL SOFTWARE COUPON! 


at one time! Converts your Commodore 64 to 80 
COLUMNS when you plug in the 80 COLUMN 
EXPANSION BOARD!! List $199SALE $99 
PLUS—you also can get an 80 COLUMN BOARD 
WORD PROCESSOR with mail merge, terminal 
emulator, ELECTRONIC SPREAD SHEET. List 
$59.00 SALE $24.95 if purchased with 80 total memory to 41K (41,000 bytes). Memory 


" j: 
COLUMN BOARD!! (Tape or Disk) block switches are an outside cover! CARDCO 
80 COLUMNS IN COLOR EXECUTIVE QUALITY Includes FREE $29.95 adventure game!! 
EXECUTIVE WORD PROCESSOR $69.00 PROFESSIONAL BUSINESS SOFTWARE 
This EXECUTIVE WORD PROCESSOR is the 
finest available for the COMMODORE 64 com- 
puter! The ULTIMATE for PROFESSIONAL Word- 


pands total memory to 33K (33,000 bytes). 
Memory block switches are on outside of cover! 
Includes FREE $16.95 game. 


16K RAM CARTRIDGE $55.00 
Increases programming power 4 times. Expands 


12" GREEN SCREEN MONITOR $99.00 
Excellent quality GREEN PHOSPHOROUS 


The Cadillac of business programs 


processing application! DISPLAYS 40 OR 80 for Commodore 64 Computers VIDEO MONITOR with antiglare, 1920 characters 
COLUMNS IN COLOR or Black and White! Sim- Item List “SALE (80 characters x 24 rows). Save your TV! a must 
ple to operate, powerful text editing with a 250 Inventory Management $99.00 $59.00 for 80 column word processors. PLUS $9.95 for 
WORD DICTIONARY, complete cursor and in- Accounts RecsWvable ОП 45000 VIC 20 or Commodore 64 Cable. 

sert/delete key controls line and paragraph inser- Payroll y $99.00 $59.00 

tion, automatic deletion, centering, margin set- General Ledger $99.00 $59.00 

tings and output to all printers! Includes a (“COUPON PRICE $49.00) 12” AMBER SCREEN MONITOR $119.00 


powerful mail merge. List $99.00 SALE $69.00. Premium quality AMBER VIDEO MONITOR With 
20,000 WORD DICTIONARY - List $24.95 SALE antiglare, (80 characters .x 24 rows), exceptional- 
$19.95. EXECUTIVE DATA BASE - List $89.00 ly clear screen, faster scanning. PLUS $9.95 for 
SALE $59.00. (Disk only). VIC 20 or Commodore 64 Cable. 


e LOWEST PRICES е 15 DAY FREE TRIAL ° 90 DAY FREE REPLACEMENT WARRANTY 
е BEST SERVICE IN U.S.A. e ONE DAY EXPRESS MAIL е OVER 500 PROGRAMS ° FREE CATALOGS 
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BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 


{ Add $10.00 for shipping, handling and insurance. Illinois residents 
| Please add 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAII 
I orders. WE DO NOT EXPORT TO OTHER COUNTRIES. 

Enclose Cashiers Check, Money Order or Personal Check. Allow 14 days 
for delivery, 2 to 7 days for phone orders, 1 day express mail! Canada 
orders must be in U.S. dollars. VISA — MASTER CARD — C.O.D. 
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• 15 Day Free Trial - 180 Day Immediate Replacement Warranty 


LIST SALE 
80 COLUMN THERMAL PRINTER — 60 CPS $199 $149 


Bi-directional, dot matrix, prints 8%” letter size paper, full 80 columns, high 
resolution graphics, dot bit addressable, special symbols and true decenders! 
(Centronics parallel interface) 


80 COLUMN TRACTOR-FRICTION PRINTER — 80 CPS $399 $209 
Bi-directional, dot matrix, impact, prints single sheets, continuous feed paper, 

adjustable columns, 40 to 132 characters! Roll paper adapter $32.95. 

Centronics parallel interface) 


PREMIUM QUALITY 10” CARRIAGE T/F PRINTER — 120 CPS $499 $289 
Bi-directional, impact, 9 x 9 dot matrix with double strike for 18 x 18 dot matrix. 

High resolution bit image (120 x 144 dot matrix) underlining back spacing, left and 

tight margin settings, true lower decenders, with super and sub scripts. Prints 

standard, italic, block graphics, special characters, plus 24 of user definable 

characters and much more!! Prints single sheets, continuous feed and roll paper! 

(Centronics parallel interface) 


PREMIUM QUALITY 15%” CARRIAGE PRINTER — 120 CPS $599 $379 
Has all the features of the Premium Quality 10” Carriage T/F Printer above plus a 

15%” carriage and more powerful electronic components to handle large business 

forms! (Centronics parallel interface) 


HIGH SPEED PREMIUM QUALITY T/F 


10” PRINTER — 160 CPS $699 $499 
Save printing time with these plus features: 160 CPS speed, 100% duty cycle, 8K 

buffer diverse character fonts special symbols and true decenders, vertical and 

horizontal tabs. This is Red Hot Efficiency!!! (Serial or Centronics parallel interface) 


HIGH SPEED PREMIUM QUALITY 
TIF 15%” PRINTER — 160 CPS $799 $599 


Has all the features of the 10" Carriage high speed printer plus a 15%” carriage and 
more powerful electronics to handle larger business forms! (Serial or Centronics 
parallel interface) 


PARALLEL PRINTER INTERFACES: (IN STOCK) 
* For VIC-20.and COMMODORE 64 $49.00 
* For all APPLE COMPUTERS $69.00 
* For ATARI 400 and 800 COMPUTERS $79.00 

NOTE: Other printer interfaces are available at computer stores! 


WE DO NOT EXPORT TO OTHER COUNTRIES EXCEPT 
CANADA. 


Enclose Cashiers Check, Money Order or Personal Check. Allow 


14 days for delivery, 2 to 7 days for phone orders, 1 day express E N TE R PR І 7 Е 6 (WE LOVE OUR CUSTOMERS) 


mail! Canada orders must be in U.S. dollars. We accept Visa 
and MasterCard. We ship C.O.D BOX 550, BARRINGTON, ILLINOIS 60010 
3 Phone 312/382-5244 to order 


@ SANYO MONITOR SALE!! 


80 Columns x 24 lines 
Green text display 

East to read - no eye strain 
Up front brightness control 
High resolution graphics 
Quick start - no preheating 
Regulated power supply 
Attractive metal cabinet 
UL and FCC approved 


9" Dota Monitor 


е 15 Day Free Trial - 90 Day Immediate Replacement Warranty 


9" Screen - Green Text Display $ 79.00 
12" Screen - Green Text Display (anti-reflective screen) $ 99.00 
12" Screen - Amber Text Display (anti-reflective screen) $119.00 


14" Screen - Color Monitor (national brand) $249.00 
Display Monitors From Sanyo 
With the need for computing power growing every day, Sanyo has 
stepped in to meet the demand with a whole new line of low cost, high Ф SANYO 
quality data monitors. Designed for commercial and personal com- Official Video Products 
puter use. All models come with an array of features, including up- of the Los Angeles 1984 Olympics 
front brightness and contrast controls. The capacity 5 x 7 dot 
characters as the input is 24 lines of characters with up to — 
80 characters per line. === FS _ 
Equally important, all are built with Sanyo’s commitment ===>" = 
to technological excellence. In the world of Audio/Video, Sanyo is — = 
synonymous with reliability and performance. And Sanyo quality is ETE ыы 
reflected іп our reputation. Unlike some suppliers, бапуо designs, 
manufactures and tests virtually all the parts that go into our products, QRO 
from cameras to stereos. That's an assurance not everybody can 
give you! 
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V ada $10.00 for shipping, handling and insurance. ІІІпоів residents Y 
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VIC 20 


40-80 COLUMN BOARD 
only 55,000 


Now уои сап get 40 ог 80 Columns оп your Т.М. ог monitor ай опе time! No 
more running out of line space for programming and making columns. Just 
plug in this board and you immediately convert yur VIC-20 computer to 40 or 
80 columns! Comes in an attractive molded case with instructions! List 
$129.00. Sale $59.00. 


FOR ONLY $24.95 you can get a 40-80 Column Board “WORD PROCESSOR'” with mail merge 
and terminal emulator PLUS! AN ELECTRONIC SPREAD SHEET (like Visicalc) the word 
processor requires 8K—mail merge 16K! List $59.00. Sale $39.90. *If purchased with board 
only $24.95. (Tape or Disk.) қ 


WE LOVE OUR CUSTOMERS! 


COMMODORE64 , 
80 COLUMN BOARD 


$9900 


Now you can program 80 columns on the screen 
at one time! Converts your Commodore 64 to 80 
coilumns when you plug in the PROTECTO 80 
Expansion Board List $199. Sale $99.00 


FOR ONLY $24.95 you can get an 80 Column Board "WORD PROCESSOR" with mail merge and 
terminal emulator PLUS! AN ELECTRONIC SPREAD SHEET (like Visicalc) List $59.00. Sale $39.90. 
*|f purchased with board only $24.95. (Tape or Disk.) 
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do the same thing with just one line: 
TS 
499 REM ABS TOGGLE SUBROUTINE 
500 T-ABS(T-19): RETURN 

Line 500 does it all. If T is 3, 3 minus 19 is 
—16, and the ABS chops off the minus sign. But if 
T is 16, subtracting 19 yields -3, and the minus 
sign is chopped off. 


POS (POSition of cursor) 


To understand how the POS(X) command works, 
you should recall that you are limited to 88 char- 
acters per program line on the VIC-20 (80 charac- 
ters on the 64). However, a full program line won't 
fit on one line of the screen. A line on the VIC's 
screen is only 22 characters wide, and a screen 
line on the 64 takes only 40 characters. So, a full : 
program line can fill up to four screen lines on the 
. VIC and two screen lines on the 64. 

A program line stored in memory is called a 
logical screen line. This logical line is displayed on 
your TV or monitor in one or more physical screen 
lines. The POS(X) command tells you the position 
of the cursor within the logical screen line. On the 
VIC, the position number ranges from 0 to 87, 
and on a 64, it ranges from 0 to 79. 

Whenever you press RETURN, the cursor 
position pointer is set to position 0 (the first posi- 
tion), and the cursor moves to the beginning of a 
new physical screen line. Every time you typea 
character, the position pointer increases by one 
and the cursor moves one position to the right on 
the screen. On the VIC, when you type in the 
twenty-third character, the cursor moves to the 
beginning of the next physical screen line, but the 
pointer increments to position 22, in the logical 
Screen line. (This occurs with the forty-first char- 
acter on the 64; the pointer would contain a 40.) 
The pointer continues to increase until you type 
the maximum allowable number of characters, or 
you type a RETURN. 

The POS function is little used, for good 
reason. When was the last time you asked your- 
self, “I wonder where the cursor is?" 

But there is a way you can use POS. When 
the 64 PRINTS a line longer than 40 characters (22 
characters on the VIC), it wraps around to the 
next line. Words are often split haphazardly, 
making text hard to read. 

To avoid splitting words, you can use POS(X) 
to check the cursor position and LEN(N$) to check 
the length of the next word to be printed. If posi- 
tion + length exceeds the character limit of the 
physical screen line, PRINT CHR$(13) to reset the 
position pointer to 0, then continue printing your 
text. 

The variable X in the parentheses of POS(X) 
is a dummy argument; it doesn't matter what 
value you use. 
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WAIT 

Like POS, WAIT is seldom needed in BASIC pro- 
grams. To understand how it works, think of it as 
WAIT-UNTIL. For example, you WAIT to cross 
the street UNTIL the light is green. WAIT stops 
program execution UNTIL a memory location 
contains a certain number. When the location 
contains the proper value, program execution 
continues. 

WAIT statements use the form WAIT I, m1, 
m2. Lis the memory location to be checked. M1 is 
mask one; m2 is mask two (which is optional). 
The computer PEEKs memory location I, exclusive- 
ORs the value with m2 and ANDs it with m1.(For 
further information on masks and the logical op- 
erations AND and exclusive-OR, see "The Inner 
World Of Computers, Part 2: Why Computers 
Are Logical" in the December 1983 GAZETTE, or 
Machine Language for Beginners, COMPUTE! 
Books.) 

WAIT is rarely used because memory loca- 
tions don't change arbitrarily. Since memory is 
used for storage, you expect memory to hold onto 
its contents. If a number in RAM changes, there 
has to be a good reason. 

Certain peripherals use memory locations as 
buffers and registers. Thus, WAIT is usually used 
in input/output operations. You might want your 
program to pause until a signal comes over the 
phone line to your modem, for example. You 
would use WAIT to check a buffer or input register 
when the signal comes in, the register changes, 
and the program continues. 

Datassette users can protect graphics displays 
with a WAIT statement. 

Let's say you write a program which uses 
data stored on a tape, but it does not read the 
data until halfway through the program. You 
know that when the program sees OPEN it will 
print PRESS PLAY ON ТАРЕ in the middle of the 
Screen. You may have a nice graphic display (or a 
high-resolution screen) that you don't want ruined 
by the prompt. 

A WAIT can test to see if a button has been 
pressed on the tape player: 

WAIT 1,16,16 (64 version) 

WAIT 37151,64,64 (VIC version) 

If you put this line in just before you OPEN 
the data file, the program will wait until a button 
is pressed on the tape drive. It will not print PRESS 
PLAY ON TAPE. When the play button is pressed, 
a bit is switched in memory. Your computer stops 
waiting and opens the file for input. But, alas, 
solving one problem may create another. If the 
user does not know what is happening, he or she 
may end up waiting for the computer to do some- 
thing, as it waits for the user to do something. To 
help other people use your programs, you should 


put a prompt on the screen just before the WAIT 
statement is executed, telling the user what to do. 

You can do it the other way, too. If you want 
the computer to wait for the user to press the stop 
button on the tape player, use: 

WAIT 1,16 (64 version) 

WAIT 37151,64 (VIC version) 

There are times when a joystick does not 
work with the VIC because the play button on the 
cassette drive is still on. Using the above WAIT 
statement can test for this problem. 


CONT (CONTinue) 


CONT is a valuable debugging tool. It allows you 
to restart a program which has stopped because 
you pressed the RUN/STOP key, or because the 
program hit a STOP or END. 

Let's write a simple program with a bug: 


10 М-2 :rem 29 
20 INPUT "NUMBER"; N :rem 136 
30 PRINT N; "TIMES TWO IS"; N*M :rem 213 
40 FOR M = 1 TO 20: NEXT M: REM DELAY LOO 

P :rem 152 
50 GOTO 20 :rem ð 


Now RUN the program. The screen says 
NUMBER? Type in 15, press RETURN, and it 
gives the result of 30. So far, so good. Now try 
zero. Zero times two is zero. It seems to be 
working. Type 4 and the computer says four times 
two is eighty-four. Something is wrong. 

It's debugging time. Insert this line: 35 
STOP. 

RUN it again and the computer multiplies 
correctly. Then it stops and says BREAK IN LINE 
35. Type CONT and it continues. Try another 
number (except zero). The answer is incorrect; 
the program stops again. Type PRINT N, M and 
you will discover that M is now equal to 21. If you 
want to try another number, type CONT. Each 
time you will discover that M equals 21. That's a 
clue that something is not working right. 

If you're wondering what the bug is, you 
may notice that M starts out as 2 (line 10), but that 
itis also used in the delay loop. To correct it, you 
have to use a different variable in line 40. 

Some bugs do not occur right away. The first 
time through, everything works. Then the bug 
pops up. The best way to step through a program 
is to use the STOP-PRINT-CONT combination. 

There are a few BASIC commands that can 
be used only in a program; they don't work in 
immediate mode. CONT is unique: It is the only 
command used exclusively in immediate mode. 


SGN (SiGN) 
SGN is used to evaluate numbers. If the number 
is positive, the resultis 1. If the number is negative, 
SGN gives you a –1. If the number is zero, you 
get a zero. 

This function complements the ABS com- 
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mand discussed above. ABS throws away the 
sign so you can look at the number. SGN throws 
away the number but keeps the sign. 

Some programmers use SGN to make deci- 
sions about branching. 


10 FOR J = 1 TO 5: READ K: PRINT K; 

:rem 198 
20 ON (SGN(K)+2) GOTO 30, 40, 50 :rem 238 
30 PRINT "IS NEGATIVE.": GOTO 60  :rem 42 
40 PRINT "IS ZERO.": GOTO 60 :rem 24 
50 PRINT "IS POSITIVE." :rem 115 
69 NEXT J гет 239 
500 DATA 15, 300, -4, Ø, -654.32 :геп 72 


In the program above, line 20 checks the sign 
of the number. SGN(K) yields –1, 0, or 1. Add 
two to get 1, 2, or3. The ON-GOTO then makes 
the program branch to line 30, 40, or 50. It's a 
quick way to check for positive or negative num- 
bers and branch accordingly. 

SGN is also good for comparisons. To com- 
pare two numbers (the scores of player one and 
player two, for example), subtract one from the 
other, and use SGN to evaluate which one is 
higher, perhaps with the ON-GOTO syntax of 
line 20 above. 


ATN (ArcTaNgent) 


Few people have neutral feelings about 
trigonometry; you either love it or hate it. 

If you can't remember anything you learned 
in trig, don't worry, this won't be too technical. 
First, look at the triangle below. 


spaceship 


y value 
angle 


a A 

Imagine that you are looking at a spaceship 
flying toward you out of the sky. Your computer 
can figure out the values for x and y, but you have 
to aim the laser, which is your only defense. And 
you don't have a joystick; you have to figure out 
the angle at which to shoot. 

You're in luck because your computer knows 
how to use ATN. ATN(Y/X) gives you the angle 
in radians. Divide by z (pi) and multiply by 180 to 
get the answer in degrees. (To type the т symbol, 
hold down SHIFT and press the up-arrow key.) 
This simple program calculates an angle from X 
and Y coordinates. 


x value 


10 PRINT "X AND Y COORDINATES" srem 241 
20 INPUTX,Y :rem 207 
30 IF X=@ THEN S-SGN(Y):D-90*S:R-S*1/2:GO 

ТО5@ :rem 39 
40 R=ATN(Y/N): D-R*189/T :rem 251 


50 PRINT "ANGLE IS";R; "RADIANS": PRINT D; 
"DEGREES": GOTO 10 :rem 164 
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Toll FREE (800) 992-3300 
For Information Call (609) 596-1234 


Call us for reliable service, experience and affordable prices! 


CMD 


Computer 


SCALL 


1541 
Disk Drive *Call 


1520 Color Plotter 
MPS 801 Printer 
1526 Printer... 
1530 Datasette. 
1650 Auto Modem 
1110 8K Memory Ex, 
1111 16K Memory Exp 
1011 RS 232 

Terminal Interface. 
1211 Super Expander.. 
1212 Prog. Aid Cartridge... “39 
1213 Mach. Lang. Monitor 539 
1312 Paddles.. 5 UU Ss 
1311 Joystick. .54.95 


14" screen, outstanding. 
resolution, special Commodore. 
computer circuit 


ЖЖП 


PRINTERS 
EPSON 


RX-80, RX-80 FT. 
FX-80, FX-100... 


OKIDATA 


Gemini 15Х. 


SMITH CORONA 


CARDCO 
Cardco G+ 
Printer Interface ................ 
Cardco Printer Interface B+ 
Tymac the Connection....... 
6 Slot Expander Interface 
3 Slot Expander Interface 
Code Writer 


Prices reflect a cash discount. 


FLOPPY DISK 
Elephant SS/DD (10) 
Elephant SS/SD (10) 
Verbatim 55/00 (10) .. > 
WORD PROCESSING 
Quick Brown Fox .. 

Easy Script... 
Word Pro 64. 


EZ Spell 
PROGRAMMING SERIES 
Assembler 64 415 
Logo .. *38 
Pilot... *38 
Simon 19 
Screen Editor. 

CPM 2.2. 

EDUCATION 


English I-VII 
Math I-VIII. 
Computer Science. 
Science І- 


Geography 
GAMES 


Avenger . 


Wizard Wor 519 
Jupiter Lander. 14 
Pinball Spect . 516 
Lemans ..... *14 


Radar Rat Race. 


Sea Wolf ... 
INFOCOM 
Zork І, II, II! 


Suspended 
Starcross 325 
Deadline. 
Features 
heavy duty. 
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with vinyl 
Interior 
waterproof. 
-$6.99 
Reg. 51555 Ж 53253 
56.99 
Espon MX 80.... $7.99 
56 99 Espon MX 80 FT $7.99 
" Okidata 92 ......57.99 
ATARISOFT 
Centipede 535) 
Defender.. .535 
Dig Dug... .°35 
Donkey Kong 2535 
Рас Мап .. SERI 


Robotron . 535 


Special of the Month 


DELPHI ORACLE 


589 


Оле & Payment Policy 


‚ For C.O.D., Visa, and Master- 


cardadd 3% Immediate delivery with certified check or wired 
funds. N.J. resident add 6%. Prices subject to change. 


Shipping 
For shipping and handling 
add 3%. ($3 minimum) 
Larger shipments require 
additional charge. 


Catalog 
We sell a large selection of 
hardware and software. 
Send $1 for catalog, refun- 
dable with order. 


Commodore 64 
and 
VIC-20 ке 
$149” 
Telecommunications 
with a difference! 


Unexcelled communications power and 
compatibility, especially for professionals and 
serious computer users. Look us over; SuperTerm 
isn't just “another” terminal program. Like our 
famous Terminal-40, it's the one others will be 
judged by. 

* EMULATION — Vost popular terminal protocols: 

cursor addressing, clear, home, etc. 

* EDITING — Full-screen editing of Receive Buffer 

* UP/DOWNLOAD FORMATS — CBM, Xon-Xoff, 
ACK-NAK, CompuServe, etc. 
FLEXIBILITY —Select baud, duplex, parity, stopbits, 
etc. Even work off-line, then upload to system! 
DISPLAY MODES—40 column; 80/132 with 
side-scrolling 
FUNCTION KEYS— 8 standard, 52 user-defined 
BUFFERS — Receive, Transmit, Program, and Screen 
PRINTING — Continuous printing with Smart ASCII 
interface and parallel printer; buffered printing 
otherwise 
DISK SUPPORT — Directory, Copy, Rename, Scratch 


Options are selected by menus and EXEC file. Software 
on disk with special cartridge module. Compatible with 
CBM and HES Automodems; select ORIG/ANS mode, 
manual or autodial. 


Write for the full story on SuperTerm; or, if you 
already want that difference, order today! 

Requires: Commodore 64 or VIC-20, disk drive or Datasette, and 
compatible modem. VIC version requires 16K memory expansion. Please 
specify VIC or 64 when ordering. 


Smart ASCII Plus... 559% 


The only interface which supports streaming — sending 
characters simultaneously to the screen and printer — with 
SuperTerm. 

Also great for use with your own programs or most 
application programs, i.e., word processors. Print modes: 
CBM Graphics (w/many dot-addr printers], TRANSLATE, 
DaisyTRANSLATE, CBM/True ASCII, and PIPELINE. 


Complete with printer cable and manual. On disk or cassette. 


VIC 20 and Commodore 64 are trademarks of Commodore Electronics, Ltd. 
Send for a free brochure. 

(81 6) 333-7200 MAIL ORDER: Add 51.50 shipping and 

m handli 50 for C.O.D); VISA/Mastercard 

MIDWEST ШЫ pen БЫ exp. p MO UE 


add 5.625% sales tax. Е orders ible 
MICRO inc. Ало sede cpm. 


311 WEST 72nd ST. ° KANSAS CITY ° MO ° 64114 


When you run the above program, you will notice 
that the angle will always range from +7/2 to — т/2 
(+90 to -90 in degrees). If you want the full range 
of 0 to 360 degrees, you have to figure out which 
quadrant you're in and adjust the results. You 
would most likely use SGN to find out if x and y 
are positive or negative. 

ATN may seem to be an esoteric, obscure 
function of interest only to mathematicians, but 
there are times you may need it. 

If you want to do a three-dimensional display, 
for example, you will probably need ATN to figure 
the angles. It may also be useful in a Star Trek 
simulation when you need to figure out where 
the ship is and which shields the Klingons are 
battering. 

Anytime you are working with angles, re- 
member ATN. 


LOG (natural LOGarithm) 


This is another function which may intimidate 
those who aren't mathematicians. The idea behind 
itis actually fairly simple and can be helpful in 
some programs. 

If you type PRINT1014, the result is 10000, 
because it's ten to the fourth power. Reversing 
this function, the logarithm (base ten) of 10000 is 
4. Simply put, the logarithm of a number is the 
exponent you use on the base. 

AM radio dials use a logarithmic scale, which 
is why the distance between 600 and 800 appears 
to be bigger than the distance between 1400 and 
1600. You can also find a logarithmic scale on a 
slide rule. 

The LOG built into your computer does not 
use base ten. It is a natural logarithm, which has 
certain special properties. Try the following short 
program: 


10 INPUT"NUMBER";N :rem 135 
20 PRINT: PRINTLOG(N)/LOG(2), :rem 247 
30 PRINT LOG(N)/LOG(10) :rem 52 
40 GOTO 10 :rem 254 


This program figures out the log (base two) 
and the log (base ten) of a number. Try inputting 
the numbers 10, 100, 1000, and so on. The right- 
hand column should contain whole numbers. 
Now try 2, 4, 8, 16, and 32. You should see integers 
on the left. 

So far it's just math. Now let's use LOG to 
solve a common problem. Computers are good at 
moving numbers around. And it is sometimes 
necessary to print a column of numbers with all 
the decimal points lined up, nice and neat. 

Unfortunately, Commodore BASIC has 
neither a PRINT USING nor a PRINT AT com- 
mand. Beginning programmers sometimes align 
numbers with a complicated string-conversion 
procedure. For example, they might use INT to 
make the number an integer, STR$ to make it a 
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string variable, LEN to find out the length, and 
finally a calculated TAB to print the number in its 
place. 

Using LOG can make things simpler. The 
following program aligns numbers of all sizes. 


10 T=LOG(18): D=14 :rem 166 
20 INPUT N srem 64 
30 S-INT(LOG(N)/T) :rem 51 
40 PRINT TAB(D-S);N :rem 102 
50 GOTO 20 :rem 0 


Line 30 figures the base ten logarithm of the 
number from line 20. In effect, you find the length 
of the number by using its (base ten) logarithm. 
Numbers 1 through 9 have a log of zero, 10 
through 99 have a log of one, and so on. 

But, unfortunately, we have once again 
solved one problem and created another. We can- 
not find the logarithm of a negative number or 
zero. This can be remedied with two of the BASIC 
commands described earlier. Add the following 
line to trap zero: 

25 IF(ABS(SGN(N))-1) THEN 86-0: GOTO 40 
:rem 25 

It would actually be simpler to say IF N 20 
THEN 5-0, but let's go with ABS and SGN. То 
deal with negative numbers, change line 30 from 
LOG(N) to LOG(ABS(N)). 

And now we have it, a routine for aligning 
decimal points, without having to resort to integer/ 
string conversion. 


Using Little Known Commands 
The most useful BASIC keywords are still the 
most common ones, such as PRINT and FOR- 
NEXT. But if you take the time to learn these sel- 
dom used commands, you may be rewarded 
someday when you are struggling to solve an 
unusual programming problem. @} 


COMMODORE 64" & VIC 20" OWNERS 
END THE CLUTTER & MAKE IT PORTABLE 

PORTA-COMPUTE 
Makes a neat package 
holding your C64 or VIC 20, 
disk drive & your monitor 
or TV (up to 9") in a sturdy. 
metal case making your 
System portable. Just plug 
in and start computing. 
A carrying handle & master 
Switch make it even easier 
to use. Use a printer or 
external monitor, too. 


Some assembly required. 
To order your PORTA-COMPUTE send check or money 
order for $129.95 (includes shipping) to: J.C. Enterprises 


427 Scandia Ave. Des Moines, lowa 50315 
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The VIP Terminal is only the first in a 
whole series of elegant software for 
your Commodore 64 called the VIP 
Library. This complete collection of 
easy-to-use, serious, high quality, 
totally interactive productivity software 
includes VIP Writer, VIP Speller, VIP 
Calc, VIP Database, VIP Disk-ZAP, VIP 
Accountant and VIP Tax. All are equal 
in quality to much more expensive 
software for the IBM PC, and all are 
very affordable! 
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VIP Library programs are not limited 
by the size of your computer's 
memory. All programs use virtual 
memory techniques to allow creation 
and use of files larger than your 
computer's available work area. You're 
only limited by the space on your disk! 


91983 by Softlaw Corporation 


ped 
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Hi-res technology and sprites allow 
VIP Library programs to bring you task 
Icons, made famous by the Apple Lisa™ 
and the Xerox Star™. With these 
advanced sprite representations of the 
task options open to the user, even the 
total novice can, at a glance, perform 
every task with ease. Just look at the 
icon and press a key! No programs are 
easier or more fun to learn and use! 


|All VIP Library programs are 
compatible with each other and other 
computers for easy file transfer. Each 


uses ASCII, the universal language of 
computer communications so that files 
can be sent to and received from other 


, computers without modification! The 


Library also gives you the benefit of a 
consistent icon and command 
structure. Once you have learned one 
program, the others will come easily. 


E For Orders ONLY 


masa — Call Toll Free — s 


Order Status and Software Support 
call (612) 881-2777 

Available at Dealers everywhere. If your 

Dealer is out of stock ORDER DIRECT! 

MAIL ORDERS: $3.00 U.S. Shipping ($5.00 


CANADA; $10.00 OVERSEAS. Personal 
checks allow 3 weeks. 


Built-in 40, 64, 80 and 106 columns 
Word wrap for a formatted display 
Talk to any computer 


Use any modem and printer 

Written in fast machine code 

15 entry phone directory 

т 20 programmable keys 

m Automatically dial, redial, upload, 
download and log-on 

m Professional 96 character ASCII display 

m 128 character ASCII keyboard 

m Simultaneous on line printing and 
saving of files to tape and disk 

m Use and save files as big as your disk! 

m E Mail & E-COM Compatible 


The 40- апас -per-line display of 
the Commodore 64 is inadequate for 
serious computing. An 80-column 
display is the industry standard. VIP 
Library programs bring this standard to 
your Commodore 64 with state-of-the- 
'art graphics, without need for costly 
hardware modifications. With VIP 
Library programs you can freely choose 
from four displays: the standard 40 
column display, plus a 64, 80 and even 
a 106 column by 25 line display. With 
these programs you can have more text 
on your screen than on an IBM PC or 
an Apple lle with an 80-column board! 
Welcome to the professional world! 


Softlaw Corporation has years of soft- 
ware experience in micros. We currently 
offer the full-line VIP Library for other 
micros in the U.S. and in Europe. Now we 
are bringing this experierice to the Com- 
modore 64 so you get ultra-high quality 
software at very affordable prices. 


9072 Lyndale Ave. So., , Mpls., MN 55420 


AUTHOR'S SUBMISSIONS 
ARE ENCOURAGED. 


Tank Mania: 


Adding А Second Joystick 
To The VIC 


Ken Gibbons and Curtis Rich 


Not only do the authors show how to connect a 


second joystick to your VIC-20, they also pro- 


vide a two-player game to put the extra joystick 


to work. The project is simple and does not 
require you to open your VIC or modify it. 
EE 


All of us have had many enjoyable hours playing 
games against the VIC. But there’s nothing like 
the thrill of beating a human opponent who is 
canny and unpredictable. Here is where a problem 
arises—all of the destructive energy you unleash 
at computer bad buys usually ends up being 
absorbed by the keyboard. In an exciting action 
game it can take a real beating, especially in a 
two-player game. 

Also, perhaps you have noticed how easy it 
is to press the wrong key, or that the computer 
recognizes only the first key pressed and ignores 
all others until the first key is released (an espe- 
cially effective tactic when you are trying to pre- 
vent your opponent from moving). For this reason 
most home computers provide us with game ports. 


Only One Game Port 

You can use joysticks, paddles, and light pens. 
with these game ports. The joysticks and paddles 
are perhaps the most popular, because they are 
inexpensive, easy to use, and can take the punish- 
ment of arcade-type action games. 

The VIC is no exception. It comes equipped 
to handle paddles or a joystick. But this is where 
we find a shortcoming in the otherwise well- 
equipped VIC. Most home computers have at 
least two game ports, but the VIC has only one. 


A Joystick In The User Port 


The VIC will handle two joysticks, though. For 
about five dollars in parts you can add the second 
game port, allowing you to operate two joysticks, 
the paddles with a joystick, or whatever. 

The VIC joystick is connected through a Ver- 
satile Interface Adapter (VIA) port. The VIC has 
four of these VIA ports for input and output pur- 
poses. Three of the VIA ports are used to read the 
keyboard, read the original game port, and for 
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The red tank attacks, while the blue player maneuvers to get 
out of the corner in "Tank Mania." 


various cassette and disk operations. The fourth 
port (called the user port) is left free. Unless you 
are using a modem or some other RS-232 device, 
the User Port on your VIC is idle and is available 
for a second joystick. 


Simple Construction 


The construction is simple and requires no mod- 
ification to the VIC. Get an edge connector (17/4 
with .156 spacing), which should fit the User Port 
on the back of your VIC. Then get a joystick con- 
nector (subminiature D type, nine-pin). It looks 
like the original game port on the side of your 
VIC and a joystick should plug into it. When you 
have the connectors, make the following connec- 
tions between them. Most connectors have the 
pins lettered right on them. If yours don’t, the 
VIC manual and the VIC-20 Programmer's Reference 
Guide contain complete pin diagrams. (See the 
figure.) 


VIC Joystick Plug 


The filled-in holes represent pins which are used. 
You will notice that this is a mirror image to the 
diagram which is in your VIC book. 

Here's what each pin does: 


Pin number Description 
T Up = Јоу 0 
2 Down -–Јоу1 
3 Left —Joy2 
4 Right —Joy3 
6 Fire Button 
8 Ground 


Simply connect these pins to a 24-pin edge con- 
nector as follows: 


Joystick Edge Connector 
1 to Е 
2 to F 
3 to H 
4 to D 
6 to J 
8 to A 


The 24-pin edge connector then plugs into 
the user I/O port on the back of the VIC, which 
has this configuration. 


VIC User Port 
ШІ) 21 1? 


AUSBISEGIESIDDESSE| KL MN 
* * 


* 


Rosa pese, 
* * * 

Pins to which connections are made are marked with an 
asterisk(*). 


When you have finished, plug the connector 
into the user port, plug in your second joystick, 
turn on the VIC, and enter this short program: 


1 DA-37136:POKEDA,6 :rem 65 
2 GOSUB 10 :rem 19 
3 PRINT"{CLR}J@ Jl 72 J3 FB" :rem 13 
4 PRINT J0;J1;J2;J3;FB :rem 35 
5 GOTO 2 :rem 160 
1 


Ø P=PEEK(DA) :J@=-((PAND4)=9) :J1--((PAND8 
)=@) :J2=-( (PAND16 )=@) :J3=-( (PAND2)=9) 
гет 52 


11 FB=-((PAND32)=9) : RETURN :rem 5 


This program demonstrates the use of the 
second joystick. When the joystick is pushed in 
any direction, the corresponding variables are set 
to one. The fire button, when pushed, sets FB to 
one regardless of the joystick's direction. Use the 
routine in lines 10 and 11 whenever you want to 
read the new joystick. The new joystick works 
just like the original. In fact, the only difference is 
the address of the VIA ports used. 

Use the second joystick any way you like. 
You can leave the original game port free for 
paddles or a light pen. However, the light pen 
and paddles will not work if plugged into the 
new game port. 


À Game For Two Joysticks 


“Tank Mania" is a fast, action-packed game for 
two players, in which each player commands a 
tank maneuvered by a joystick. The object is to 
destroy your opponent's tank. Blockades and 
mines provide natural hazards. You can remove 
these hazards by shooting them. If you shoot 

a mine on the border, you can wrap around 
the screen—try it and you will find the results 
interesting. 

The skill level is set in the first line of the sec- 
ond program. By changing the value of SL, you 
can control the number of blocks and mines. Fi- 
nally, the tanks will go between blocks diagonally 
despite the tight fit. 

The first program creates the special charac- 
ters, prints instructions, and loads Program 2. 
Before loading the second program, the first pro- 
gram deletes itself, so if you RUN the first program 
before saving it you will lose it. 

Since Tank Mania is such a long game, you 
can get a tape copy by sending a cassette, $3, and 
a SASE to: 

Ken Gibbons 

356 East 900 North 

Logan, UT 84321 


See program listings on page 160. @ 


Are you tired of paying high prices for your software? 
Let John Henry Software save you money! 


We distribute public domain software for your VIC 20" 
or Commodore 64". We've tested and documented each 
program to guarantee you hours of fun and useful 
learning experiences. We specialize in prompt delivery 
of your software, even if you order tapes, and we 
guarantee our product. 


You'll also receive our free program reference book 
when you place your order. 


VIC 20 


62 Games for Everyone . 
54 Programming, Demo 


Group VG 
Group VP 


Group VE 35 Educational Programs 


COMMODORE 64 


26 Games for Everyone 
30 Programming, Demo, Business 


Group CG 
Group CP 


Group CE 
Group CA 


16 Educational Programs 
5 Adventure Games (disk only) 


When ordering, specify group and tape or disk. 
Send check or money order payable to: 
John Henry Software 
Р.0. Box 39021 
Cincinnati, Ohio 45239 


Don't wait! Order your software today! Or write for your 
free program reference book. You'll be glad you did! 


To keep our software prices low, our ad will only appear in the June, August, 
October and December issues of this magazine. 
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HINTS&TIPS 


Finding Incorrect 
DATA Statements 


Bruno Degazio 


If you’ve discovered a clever time-saving tech- 
nique, or a brief but effective programming 

shortcut, send it in to “Hints & Tips,” c/o СОм- 
PUTE!’s GAZETTE. If we use it, we'll pay you $35. 


Here is an easy-to-use technique for finding mis- 
typed DATA statements. 

DATA statements are great for rapidly POKE- 
ing numbers into memory, whether it’s for a 
machine language program, a musical composi- 
tion, custom characters, or some other purpose. 
You simply program a FOR-NEXT loop, READ 
the data, and POKE. 

Consider the following program: 


SC=1024: REM FOR VIC USE 7680 
DED) OR 4096 (8K+ EXPANSION) 


10 (UNEXPAN 


zrem 9 


20 PRINT"[ÍCLR]********" :rem 22 
30 FOR J = SC TO SC+5 :гет 0 
40 READ K: РОКЕ J, K :rem 245 
50 NEXT J :rem 238 
6@ REM (MORE PROGRAM LINES) :rem 97 
500 DATA 20,5,19,20 :rem 150 
510 БАТА 999 :гет 91 


If you RUN the above program, you will get 
an ?ILLEGAL QUANTITY ERROR IN 40—but 
there's nothing wrong with line 40. It simply reads 
a number and tries to POKE screen memory. The 
real problem is line 510 and the number 999. You 
can POKE memory locations only with numbers 
from 0 to 255. The number 999 is out of range and 
stops the program in line 40. Even though the 
error message tells you to look at line 40, you really 
have to correct line 510. 

Searching through a list of DATA statements 
can be annoying, especially if there are lots of 
them. 

There is a simple way of finding the incorrect 
DATA statement. Memory locations 63 and 64 
contain the line number of the last DATA state- 
ment used. It is stored in low byte/high byte for- 
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mat. To find the offending DATA line, type this 
in immediate mode (without a line number): 


PRINT PEEK(63) + PEEK(64)*256 


You can then LIST that line to find the item 
that caused the problem. An incorrect DATA state- 
ment is usually the result of a missing comma or a 
number that was accidentally typed twice. No 
matter how careful you are, mistakes will some- 
times creep into your typing. But this pro- 
gramming tip should reduce your debugging time. 


LL BRIT 


CASSETTE INTERFACE 


USE ANY PORTABLE 
CASSETTE RECORDER 
CONTROLS THE CASSETTE 
MOTOR 

MAKE COPIES OF ANY 
TAPE PROGRAM 
SATISFACTION GUAR- 
ANTEED 

ONLY $34.95 PLUS $1.60 FOR 
SHIPPING 


FULL RS232 INTERFACE 
CONNECTS TO USER PORT 


FULL RS232 CONVERSION 


CONNECTS ANY STANDARD 
MODEM OR SERIAL PRINTER 


COMES WITH TYPE IN BASIC 
TERMINAL PROGRAM 
SATISFACTION GUARANTEED 
ONLY $39.95 PLUS $1.60 FOR 
SHIPPING 


ADD $2.50 EXTRA OUTSIDE US, CANADA OR MEXICO 
SEND TODAY FOR OUR FREE CATALOG 


SEE YOUR LOCAL DEALER OR CALL: 
(206) 236-BYTE 


Formerly BYTESIZE ) 


š OMNITRONIX (меко TECHNOLOGY 


| PO BOX 12309 DEPT.FG 
SEATTLE, WA 98111 


For CBM-64 
and VIC 
owners only: 


This is just 1 of 
20 pages of the . 
newest and biggest 
Skyles catalog, hot 
off the press. 


We know you'll 

want this page, in From Skyles 

its full 7 x 10 Electric Works, the 
splendor, and sending you your oldest and largest 
another 19 pages very own copy professional 

of peripherals, within the last few specialists in the 
software and books weeks, call us at business. 

that will make your (800) 227-9998 

СВМ-64 or VIC (unless you live 

computer even in California, in Skyles Electric Works 
nicer to live with. which case call 231-E S. Whisman Road 


So, if we missed (415) 965-1735. Mountain View, California 94041 


CHARLES BRANNON 
PROGRAM EDITOR 


Many people are searching for an alternative to 
BASIC. BASIC is easy to use, easy to learn, and 
almost carefree in style and coding. Yet BASIC is 
not as fast as a high-levellanguage can be. It does 
not encourage or support modular or even struc- 
tured programming. It is a very general language, 
so it lacks commands specific to certain situations, 
such as graphics, games, business/professional 
applications, and mathematical work. It's also 
hard to teach and grade (compared to a language 
like Pascal). 

The microcomputer world knows several 
languages which have come down to earth from 
the mainframe computers: COBOL, FORTRAN, 
Pascal, PL/I, LISP, APL, even ALGOL. Languages 
which work out particularly well on micros include 
BASIC, of course, PILOT, Logo, C, and Forth. 
These languages work well within the speed and 
memory limitations of many personal computers. 

The business community has been trans- 
forming its software choices by adapting the larger 
languages (COBOL, FORTRAN) to 64K Z80 CP/M 
(Control Program for Microprocessors) com- 
puters. These languages are often subsets of the 
minicomputer versions of the languages. They 
are smaller versions of the languages, but are still 
quite powerful and flexible. 


CP/M And The 64 


Many Commodore 64 owners, especially educators 
and businessmen, are intrigued with the Commo- 
dore CP/M cartridge. It appears to be a gateway to 
the many thousands of programs that will run only 
on a CP/M system. 

CP/M offers the 8080 or Z80 programmer a set 
of general, transportable microprograms. These 
microprograms are customized to each computer, 
yet act the same from a program's point of view. 

These microprograms make up the Basic Input/ 
Output System, or BIOS. The BIOS is much like the 
64's set of Kernal routines, which enable a 6510 
machine language programmer to work with input 
and output. The Kernal's strongest point is that its 
routines have the same addresses (entry points) on 
many Commodore machines. For example, there's 
a machine language program at $FFD2 (hexadeci- 
mal) that lets you output a single character to the 
Screen or current output device (perhaps the printer 
after a CMD). You can try out this routine from 
BASIC with POKE 780,А5С(%х”):5Ү5 65490. x is 
the character you want to print, so put it inside 
double quotation marks. 

All eight-bit CP/M programs are written in 
either 8080 or Z80 machine language. These micro- 
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"HORIZONS: 64 === 


processors and the commands they use are not 
compatible with the 6510, so you need to add a 
microprocessor to the computer. The Commodore 
CP/M cartridge contains a Z80 microprocessor and 
plugs into 64's expansion port. It also contains cir- 
cuitry that permits the 64 to switch between the 
6510 and the Z80. But you don't have CP/M yet. 
CP/M is supplied on a disk that you load into your 
64 before you begin working with CP/M. 


The Disk Problem 


It takes a long time to load. The Commodore 1541 
disk drive is not fast. To be frank, it is one of the 
slowest disk drives on the market. Don't feel bad, 
though, it is also about the least expensive. CP/M, 
however, was written for machines with fast, ex- 
pensive disk drives. It is highly disk-intensive. It 
accesses the disk frequently for the various utilities 
it performs. The 1541 is the weak link in 64 CP/M. 
Programs behave sluggishly. 

But that is not what makes CP/M unusable on 
the 64. CP/M adds great capability and potential, a 
whole new world. But as you found out when you 
brought your 64 home, it takes software to make 
your computer do anything. And that's what's 
missing from Commodore CP/M. 

Sure, there are probably 10,000 CP/M programs 
out there, maybe more. But there's one big point of 
incompatibility in the world of CP/M: disk formats. 
Just as you can't even read an Apple or Atari disk 
on your 64, many CP/M computers cannot inter- 
change disks. The BIOS is general, but other things 
like screen formatting and cursor control are not. 
CP/M often requires 80 columns, which isn't easily 
workable with 64 CP/M. 

So COBOL, FORTRAN, and WordStar are avail- 
able with CP/M, but there are no disks you can buy 
which your 1541 can read. Commodore has some 
plans to release some 1541-readable CP/M software, 
but we've yet to see it. 

Dedicated "hackers" or machine language 
programmers may be interested in CP/M. They 
can write programs which switch between the 
6510 and Z80, getting a chance to learn about 
another microprocessor, and enjoying the best of 
both worlds. 

Some third-party companies are charging 
upwards of $300 for CP/M (although many do 
have some CP/M software that can be used with 
the 64). Commodore should be applauded for 
making CP/M available for about $60. No other 
company has sold CP/M, including the necessary 
hardware, for so little. But right now we're waiting 
for an encore. (8) 


We had a problem. So we invented 
PC-DocuMate™ to solve it. The problem was 
how to quickly master the VIC-20 and 
CBM-64 keyboards and easily start pro- 
gramming in BASIC on our new personal 
computers. First we went through the 
manuals. 


INCONVENIENT MANUALS 

The user's guide was a nuisance and the 
programmer's reference manual was just 
plain inconvenient to use. We found the 
control key combinations confusing and the 
introduction to BASIC to be too "basic" for 
our needs. We needed a simple solution to 
our documentation problems. 

So we decided to surround the keyboard 
of each PC with the information we wanted. 
We decided to print whatever we needed on 
sturdy plastic templates which would fit the 
keyboard of either the VIC-20 or Commo- 
dore 64. 


SIMPLE SOLUTION 

This was the simple solution to our prob- 
lem. Now we could have the essential 
information right at our fingertips. 

On the left side and top of the templates 
we put BASIC functions, commands, and 
statements. On the lower left we used key 
symbols to remind us of how to use SHIFT, 
RUN/STOP, CTRL and the "Commodore" 
key. Over on the bottom right side we put 
some additional keys to help remember 
about CLR/HOME and RESTORE. But we 
were still a little confused. 


STILL CONFUSED 

We found we were confused about music 
programming, color graphics, and sprites. 
On both the VIC-20 and the CBM-64 tem- 
plates we carefully organized and summar- 
ized the essential reference data for music 
programming and put it across the top— 
showing notes and the scale. All those 
values you must POKE and where to POKE 
them are listed. 

Then to clarify color graphics we laid out 
Screen memory maps showing character 
and color addresses in a screen matrix. (We 
got this idea from the manuals.) 

For the VIC-20 we added a complete 
memory address map for documenting 
where everything is in an expanded or 
unexpanded VIC. 


For the Commodore 64 we came up with 
a really clever summary table for showing 
almost everything you ever need to know for 
sprite graphics. 


GETTING EASIER 

Now we had organized the most essential 
information for our VIC and 64 in the most 
logical way. BASIC, music, color graphics, 
and sprites all seemed a lot easier. Our 
initial problem was solved by PC-Docu- 
Mate™. 

But we have a confession to make. 


WE CHEATED 

We had solved this kind of problem 
before. In fact, many times before. You see, 
we at SMA developed the original PC-Docu- 
Mate for the IBM PC. We've made templates 
for IBM BASIC and DOS, for WORDSTAR™, 
VISICALC™ and other best-selling software 
packages for the IBM PC 

So we knew we could invent another 
PC-DocuMate™ to solve our problems with 
the VIC-20 and Commodore 64. Now our 
solution -can be yours and you can join the 
thousands of satisfied users of our template 
products. 

Take advantage of our experience and 
success with PC-DocuMate templates. Get 
one for your personal computer. 


SOME SPECIFICS 

Our templates for the VIC and 64 are 
made from the same high quality non-glare 
plastic as the more expensive IBM PC 
versions. 

The templates are an attractive gray 
color and are imprinted with a special black 
ink which bonds permanently to the plastic. 
They are precision die-cut to fit your 
keyboard. 

Unlike some other products we've seen 
in this category, PC-DocuMate templates 
are professionally and expertly designed. 
And they are fully guaranteed. 


OUR GUARANTEE 
We guarantee your satisfaction. You must 
be satisfied with your PC-DocuMate for your 


VIC-20 or CBM-64. Try it for 10 days and if 
for any reason you are not satisfied return it 
to us (undamaged) for a full refund. No risk. 


EUREKA! 


That's what we said when our new 
“invention” solved all our VIC-20™ and 
Commodore-64™ programming problems 


SOLVE YOUR PROGRAMMING 
PROBLEMS WITH PC-DocuMate™ 

Order your PC-DocuMate today (by 
phone or mail) and solve your VIC-20 or 
CBM-64 programming problems. Send only 
$12.95 and specify which computer you 
have. We pay for shipping and handling. 
Use the coupon below or call 919-787-7703 
for faster service. 


| templates and/or CBM-64 tem- | 
| plates at $12.95 each. | have enclosed | 
—— ys | 
Check — Money order __MC/VISA — | 


| 

! 

| 

E 

| | 
| Address 

| | 
ЕС State Zip 
| 

ЕСІП Ехр. | 
| | 
ІШ | 
| Signature 


Foreign orders (except Canada) add $5.00 US 


| 

| Mailto: Systems Management Associates | 
3700 Computer Drive, Dept. J-1 

P.O. Box 20025 | 

| Raleigh, North Carolina 27619 | 

| 

I 


| 


VIC-20 апа Commodore 64 are trademarks of Commodore Busi- 
ness Machines, Inc. 


Ad no. 731 Copyright 1983, SMA. 
Dealer inquiries invited. 


Variable Storage: 
À Beginner's Tour Of BASIC 
RAM For VIC And 64 


Pete Marikle 


You can simplify the search for program bugs 
if you take a short tour through BASIC RAM 
and use this subroutine that displays variable 
values. 

DEAE 


Normally, you don't need to know what happens 
to your program when you type RUN. The BASIC 
interpreter takes over, leaving you free to use the 
computer to figure your income tax, write a letter, 
or save the galaxy. 

When your program crashes, though, or gives 
you an incorrect result, you have to switch from 
computer user back to programmer, locate the 
bug, and fix it. Debugging is easier if you can 
look at the values of your variables and arrays 
while the program is running, to be sure that loops 
are being completed and data are being put in the 
right place at the right time. 

Programs 1 and 2 are different versions of a 
subroutine that displays the current values of all 
program variables. By inserting STOP statements 
in any line where you suspect a problem, you can 
“freeze” the action and GOTO the subroutine to 
check your logic, statement by statement. 


A Quick Tour Of RAM 


Before we examine the subroutine, let's take a 
sightseeing tour through BASIC RAM for a quick 
look at where your VIC-20 or 64 stores your pro- 
grams and variables, how it tells a string from an 
integer variable, and how you might use less mem- 
ory by doing a few things differently. You don't 
have to take the tour in order to use the subroutine, 
but it will give you a better idea of how the sub- 
routine works. 


108 COMPUTE!’s Gazette April 1984 


First, type in this short BASIC program that 
allows you to peek into the computer’s memory: 


10 S=256:PRINT"{CLR}START ADDRESS": INPUTZ 
:rem 228 
20 бб" 2 kk kk k jejejeje dede keen іТ5-” _—— Á 
---------------- :rem 7 
FORX=ZTO ( PEEK(55)+S*PEEK(56) ) : PRINTCHR 
$(144)X, PEEK(X)SPC(2)CHRS (PEEK(X) ) 
:rem 35 
Y=X+1:U=PEEK (45 )+S* PEEK (46) : V-PEEK(47) 
+S*PEEK (48) : W-PEEK(49) -S*PEEK(52) 


30 


35 


ігеп 81 
40 IFY-UORY-VORY-WTHEN PRINTSS :rem 44 
45 IFX»-UANDY«VTHENT-T-41:GOTO47 :rem 44 
46 T-Ü :rem 43 
47 IFT THEN IFT/7-INT(T/7)«.01THENPRINTTS 

:rem 232 
50 WAIT 197,32:NEXT :rem 69 


60 REM END OF PROGRAM APPROACHING:rem 250 


If you want to use this program again, you should 
SAVE it to tape or disk. 
Now enter these samples in direct mode: 
AB=12.34:CD = -12.34:AB$ = “НЕІЛ.О”:АВ% = 1983: 
AB(1) 2 111:CD(1) = –111:АВ%(1) = 1024:AB$(1) = 
"BYE" 


Hit RETURN, and enter some more: 


DIMCD$(3,5,5):CD$(1,0,0) = "^SEE":CD$(2,0,0) = 
^YOU":CD$(1,1,1) = "LATER" 

Hit RETURN again, and your computer will have 
at least one of every type of variable stored in 
RAM. Now type GOTO 10 and RETURN. Do not 
type RUN (RUN resets all variables). Respond 
to the prompt with 4300 as a start address for the 
unexpanded VIC, 1230 if you're working on a 
VIC with 3K expansion or Super Expander and 
4800 if your VIC has 8K or more expansion mem- 
ory. For the 64, respond with 2250. 


DUNGEDNS, 


E 


AARDVARK LTD. 


VIDEO ADVENTURES" 


DUNGEONS OF MAGDARR - Serious 
D of D for up to 8 players. 
Features full 3d GRAPHICS! 
You get a choice of several 
characters that grow from 
game to game and are 
interchangeable with char- 
acters from our famous 
Dungeons of Death game. A 
real dungeon with level after 
level of monsters to conquer 
and treasures to find - all in 
hi-res 3d graphics. 


Available On: TRS806, ІВМ PC, CMD64 


TAPE $19.95 DISK $24.95 


QUEST - A different kind of 
Graphic Adventure, it is 
played on a computer 
generated mape of Alesia. 
You'll have to build an army 
and feed them through 
combat, bargaining, explo- 
ration of ruins and temples, 
and outright banditry! Takes 
2 - 5 hours to play and is 
different each time. 


Available On: TRS80C 16K, CMD64, VIC20 13K, MC10 
16K, TI99 (EXT. BASIC), IBMPC 


TAPE $14.95 DISK $19.95 


MARS - Your ship crashed on 
the Red Plane and you have 
to get home. You will have to 
explore a Martian City, 
repair your ship, and deal 
with possibly hostile aliens to 
get home again. This is 
recommended as a first 
Adventure. It is in no way 
simple - playing time 
normally runs from 30 to 50 
hours, but it lets you try out 
Adventuring before you 
battle the really tough ones. 
Full Graphics Adventure. 


Available On: TRS806, CMD 64, ІВМ PC 
TAPE $19.95 DISK $24.95 


BAG-IT-MAN - The ultimate 
arcade game for TRS80C or 
MCD64. This one has three 
screens full of BAGS OF 
GOLD, CARTS & ELE- 
VATORS TO RIDE IN, MINE 
SHAFTS, and TWO NASTY 
GUARDS. Great sound and 
color and continuous 
excitement. 


Available Оп: TRS80C 32K, CMD64 


TAPE $19.95 DISK $24.95 


STARFIRE - If you enjoyed 
StarRaiders or StarWars, 
you will love Starfire. It is not 
a copy, but the best shoot- 
em-up, see them in the 
window space game on the 
CMD64 or TRS80C. The 
fantastic graphics will put 
you right in the control room 
as you hyperspace from 
quadrant to quadrant 
fighting the aliens and 
protecting your bases. 


Available On: TRS80C 16K, CMD64 


TAPE $19.95 DISK $24.95 


PYRAMID - ONE OF THE TOUGHEST 
ADVENTURES. Average time 
through the pyramid is 50 - 
70 hours. Clues are 
everywhere and some 
ingenious problems make 
this popular around the 
world. FULL GRAPHIC 
ADVENTURE. 


Available On: TRS80C 16K, CMD64, М010 16K, IBM PC 
TAPE $19.95 DISK $24.95 


NEW! GRAPHIC ADVENTURES 


AARDVARK offers over 120 original high quality programs. Authors - AARDVARK pays top dollar for high quality 
Send one dollar for a current catalog and receive a $1.00 programs. Send a copy today for a personal review and 
gift certificate good towards your next purchase. editorial help. 


TO ORDER: Send amount indicated plus $2.00 shipping, per order. Include quantity desired and your preference of tape or disk. 
Be sure to indicate type of system and amount of memory. When using charge card to order by mail, be sure to include expiration date. 


ЧЕ 1-313-669-3110 


PHONE ORDERS ACCEPTED 


CHARGE CARDS 8:00 a.m. to 8:00 p.m. E.S.T., MON-FRI 


WELCOME 


AARDVARK Aetion Software 2352 S. COMMERCE “ WALLED LAKE, МІ 48088 ° (313) 669-3110 


CMD64 / TRS80C / IBMPC / МС20 / TI99 


The Program Looks At Itself 


The space bar is your one-touch control. Hold it 
down until the screen is nearly full, then sit back 
and take a look. You are looking at the middle of 
the tour program, with the memory addresses on 
the left, memory contents in the middle, and some 
interesting characters on the right. 

Some of those characters are meaningless, 
because a CHR$ interpretation of the contents of 
a memory location is invalid and out of context if 
the location contains a keyword, line link, line 
number, etc. But many of the characters are valid, 
recognizable translations of what you put into the 
program, and these are the ones we care about. 

Use the space bar to scroll another hundred 
or so bytes onto the screen. We're looking for the 
end of the BASIC program, represented by three 
consecutive zeros in the center column. It's not 
hard to find with our REM billboard (line 60) and 
neat borders in place. Now look at the first address 
after the three zeros. That's the PEEK 45/46 ad- 
dress (the address produced by PEEK(45) + 256* 
РЕЕК(46) in line 35). Hold the space bar down 
until that address is near the top of the screen. 


Looking At Variable Storage 
We're now in the area where strings and variables 
are stored. Everything in this area is in seven-byte 
clusters, and the program neatly separates those 
clusters for easy viewing. Find the characters A 
and B, followed by five more bytes (the cluster is 
followed by the character C). This first seven-byte 
cluster is the variable AB. The first two bytes are 
the variable name. The next five bytes contain the 
value we gave to AB, in floating-point arithmetic 
notation. Don't worry about how the math works 
for now. Suffice it to say that your decimal value 
is neatly tucked away in those five bytes. 

Note that the next variable, CD, has a similar 
structure. Remember that we gave CD the same 
value as AB, but negative. Take a close look at the 
five bytes following CD, and you'll see that values 
there are almost identical to the values in the bytes 
following AB, except that the second byte contains 
a value which is 128 greater than the correspond- 
ing byte in AB. (If you subtract 128 from the byte 
in CD, you should get the value in the corre- 
sponding byte in AB.) The high-order bit (Bit 7) in 
that particular byte is used as a sign indicator: 0 
for positive numbers and 1 for negative. Since 
that bit is on (1) for variable CD, the decimal value 
of the byte is 128 (27) higher. Your computer ig- 
nores that bit in reconstructing the value of CD, 
but uses the bit when the time comes to determine 
the sign of the number. 


String Variables 
Press the space bar and look at the next cluster, 
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representing the string variable AB$. The A is 
clear enough, but where did the B go? Here's the 
secret: The second character of a string variable 
name is stored after adding 128 to the normal 
СНК value for that character. It’s that high-order 
bit trick again. 

By checking to see if this high-order bit is 1 or 
0, your computer can tell whether this is a string 
variable or floating-point variable. Note that 194 
minus 128 is 66, the CHR$ value for the B in AB$. 
Your computer now knows that the next byte (a 5 
in our case) is the length of AB$ and the next two 
bytes will give it the address where it can find the 
actual characters you designated for AB$. The 
address is in standard low byte-high byte order 
(LB + 256*HB = decimal address). The computer 
will start at that address, to select a number of 
characters equal to the value (5) in that length 
byte, and then go on to do whatever you asked it 
to do with the string. The final two bytes of the 
cluster are zeros put in to fill the seven-byte 
cluster. 

That address for the string character can point 
to one of two very different areas of memory. If 
the string is assigned in the direct mode, the string 
characters themselves are stored at the top of free 
BASIC RAM. If the string is assigned by the pro- 
gram, the address points to the place in the pro- 
gram itself where the string values are assigned 
to the variable name. Since the characters must be 
stored as part of the program anyway, your com- 
puter doesn't waste RAM by repeating the char- 
acters in the variable storage area. 


An Unreadable Name 


Continuing our tour with the seven bytes im- 
mediately following the AB$ cluster, note that the 
variable name is unreadable. The symbols are a 
spade and a vertical bar, next to the 193 and 194. 
Subtract 128 from each and you'll find the CHR$ 
values for the A and B in the integer variable АВ%. 
When both characters in the name are greater 
than 127, your computer knows this is an integer 
variable, that only the next two bytes need be 
looked at to obtain the value of this integer vari- 
able, and that the last three bytes of the cluster 
will be filled with zeros. 

Those two value bytes contain a signed binary 
number, a different form than we saw with the 
floating-point variables. Again, don't worry about 
the details of the math. The more compact method 
of storing integer variables doesn't do much for 
you until you start using them in arrays. Integer 
arrays can cut your memory consumption 
considerably (two bytes vs. five per entry). 

Let's move on to look at arrays in more detail. 
Hold down the space bar to pass by some other 
clusters where the variables in this tour program 
are stored. We're approaching the special address 


held in PEEK 47/48, which is the beginning of 
array storage. You'll know you're there when you 
see the borderline and the clearly visible А and B 
characters in the right column. 


How Arrays Are Stored 

There are three kinds of arrays, paralleling the 
three normal variable types: floating-point arrays, 
integer arrays, and string arrays. Each can be 
multidimensional, but we'll cover that situation 
last. Your VIC or 64 allows you to use arrays with 
up to 11 elements (numbers 0-10) without a 
DIMension statement, but it does not reserve space 
for the array until you assign a value to one of the 
array elements. As soon as you do, it will set up 
an entire 11-element array, even if you only used 
one or two elements. Of course, you can DIM for 
more or fewer elements if you wish. (For more 
information on arrays, see "How To Use Arrays" 
in the February issue.) 

Each one-dimensional array begins with a 
seven-byte definition cluster followed by the 11 
element clusters (or more or less according to the 
DIMension statement). 

The seven-byte cluster will hold the array 
name in the first two bytes, following the same 
general rules we saw for the simple variables, 
depending on the type of array. The next two 
bytes will contain a link address to the next array 
set. The fifth byte tells you (and your computer) 
the number of dimensions in this array. The sixth 
and seventh bytes will show the total number of 
elements in the array set (11 for our un-DIMed 
examples). These two bytes store the total in re- 
verse high byte-low byte order. 

The element clusters that follow the definition 
cluster will each be five bytes long for floating- 
point arrays, two bytes long for integer arrays, or 
three bytes each for string arrays. These clusters 
contain the same kind of information held in the 
corresponding normal variables, but without the 
need for trailing zeros or repeated label bytes that 
are needed in variable storage. 


Unused Elements Contain Zeros 


Hold down the space bar until the first array, AB, 
nearly fills the screen. See the seven-byte cluster? 
It's followed by five zeros only because AB(0), the 
first element of this array, has a zero value. The 
next five bytes represent the value we gave to 
AB(1). The following sets of zeros represent the 
remaining unused elements through AB(10). Use 
the space bar to look at the CD array, then continue 
to the AB% integer array. 

Again, a seven-byte definition cluster, fol- 
lowed this time by 11 element clusters that are 
each two bytes long. The lesson in saving memory 
with integer arrays is dramatic. 

Next, note the seven-byte cluster for the AB$ 


array and its 11 three-byte clusters, each con- 
taining the string length byte and the address of 
the string characters. 


The Three-Dimensional Array 


Finally, we reach our sample multidimensional 
array. Things get a bit tricky here, so follow 
closely. The definition cluster will now be more 
than seven bytes long. Add two bytes for each 
extra dimension. Remember, you can set up two, 
three, four, or more dimensions of any size if you 
have the total memory capacity to handle them. 
The number of dimensions for each array set will 
be held in the fifth byte of the definition cluster. 
The very next two bytes will hold the number of 
elements in the Nth dimension (N 2 number of 
dimensions); the next two will hold the number 
of elements in the (N —1)th dimension, and so on 
until finally the first dimension is structured. 

Immediately following the definition cluster, 
the array elements will troop by in orderly forma- 
tion. For our sample, which we DIMed as 
CD9(3,5,5), the order of the three-byte clusters 
will be: CD$(0,0,0), CD$(1,0,0)....CD$(3,0,0), 
CD$(0,1,0),CD$(1,1,0)....CD$(3,1,0)......... есе 
until finally reaching CD$(3,5,5). 

As you pass through this area, you will see 
that the clusters for CD$(1,0,0) and CD$(2,0,0) are 
occupied. If you count, you'll find that the position 
for CD$(1,1,1) is also occupied, as we directed. 
As with any string, the characters themselves are 
stored elsewhere. 

If you race on now through the rest of this 
array, you'll cross the PEEK 49/50 border into the 
area of unused RAM. Don't be surprised if you 
recognize some of it. You may find remnants here 
from other programs which have been NEWed, 
or CLRed variables. 

To end the tour, just hold down the RUN/ 
STOP key and hit the space bar. 


The Variable Dump Utility 


Now let's try out the promised subroutine. Be- 
cause it takes all the values stored in a section of 
memory and sends them to an output device, our 
subroutine is called a dump utility. Type NEW to 
get rid of the tour program, type in Program 1, 
and SAVE it to tape or disk. 

The dump utility has high line numbers be- 
cause it is designed as an easy add-on to existing 
programs using the VIC quick append method 
(see COMPUTE!, March 1983). Commodore 64 
owners will find it necessary to abbreviate the 
PEEK statements in line 44580 with P SHIFT-E in 
order for the line to fit within the 64's 80-character 
limit. 

Type ina few sample variables in direct mode. 
You can reenter the previous sample set if you 
like. Again, do not type RUN; enter GOTO 44444 
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and RETURN. Your variables should be displayed; 
the program won't display the arrays until you 
press the space bar. Note that the dump utility 
doesn't list the contents of multidimensional ar- 
rays. It's not hard to do, just time-consuming. 
The routine will simply tell you which multi- 
dimensional arrays have been implemented and 
what their dimensions and element sizes are. 


Pointer Settings Affect The 
Utility 


Now CLR your variables, enter this new tempo- 
rary program step, and RUN the program again: 

10 A$—"HELLO":A = 1983:AB$(2) = "HELLO 

AGAIN" ч 
Not much happens, because it ends at line 44443, 
the subroutine protector. Type GOTO 44444 to 
view your variables as before. Now for а surprise— 
when you type GOTO 44444 and hit RETURN 
once again, you will see a display of the variables 
used in the dump utility. 

This happens because, on the first pass 
through the routine, line 44444 reads the pointers 
before they are changed to make room for the 
routine's own internal variables. On the second 
pass, the new pointer values include the storage 


We'll back you up! 


areas for the new variables. If you don't ever want 
to see the internal variables, just modify line 44543 
to read: 


IF PEEK(ZZ) 290 THEN RETURN 


Tailor The Utility For Your Needs 


You can customize the routine to fit your needs. 
For example, if you don't need the array and in- 
teger variable features, just delete lines 44465, 
44525, and everything from 44700 on. That'll leave 
you with a much trimmer 800-byte package that 
will still dump all normal string and floating-point 
variables. If you delete one of the simple variable 
subroutines, though, you should also delete the 
corresponding array variable type. Crunch out 
the REMs and spaces and you'll end up with a 
tidy utility of well under 600 bytes that'll still fill 
most needs. Program 2 is this condensed version. 
To use your dump utility as a debugging tool, 
simply insert STOP statements at desired points 
in your program, type GOTO 44444, analyze vari- 
able values, and then type CONT to continue to 
the next break. Add the appropriate printer com- 
mands, and the program will dump to the printer. 


See program listings on page 161. @ 


ATTENTION COMMODORE 64 OWNERS 


If you own а disk drive then you'll need "The 
Clone Machine". Take control of your 1541 with this 


package that includes: 


1.) Complete and thorough users manual 
2.) Copy with one or two drives 

3.  Investigate 
"PROTECTED" disks 
4.) Copy all file types including relative types 
5.) Edit and view track/block in Hex or ASCII 
6.) Display full contents of directory and print 


7.) Change program names, add, delete files 


with single keystroke 
8.) Easy disk initialization 
9.) Supports up to four drives 


Li 5 


Dealers & Distributors 
Inquiries Invited 
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and back-up many 


Special intro 539.95 % 
CALL (201) 838-9027 


Р.О. Box 113 
E о Pompton Plains, N.J. 


ПМЕГ 


NT ED 2 pipe 
Dan Carmichael, Assistant Editor 


ViCreations Se 


VIC Chip Utility 


This month we'll look at a utility that will ad- 
just your screen, change the screen and border 
colors, or reset the VIC chip at the touch of a 
finger. 


Allocating time on the family TV set can sometimes 
bea problem. In many households, nightly TV 
programs take precedence over computer use. In 
fact, Ido most of my programming on an old black- 
and-white set that sat, unused, in the garage for 
years, and use the family set only to check colors, 
etc. However, the picture on the black-and-white 
set is way out of adjustment. The screen is shifted 
so far to the right that every line of print is 
truncated. 

The VIC chip has the answer to this problem. 
The 6560 Video Interface Chip (for which your 
VIC was named) is a versatile chip that controls 
everything from horizontal and vertical screen 
adjustments to color generation, sound, volume, 
and more. The VIC chip registers are located at 
addresses 36864 to 36879. 

Some aberrations in your TV set can be cor- 
rected by simply POKEing various locations on 
the VIC chip. But this can be time-consuming 
because every time the VIC is turned off or on, 
reset, or RUN/STOP—RESTOREd, the VIC chip 
is reset, and the registers have to be rePOKEd. 


One-Finger Adjustments 


To solve this problem, I designed a "VIC Chip 
Utility." With this machine language program 
and one finger, you can adjust the TV horizontally 
or vertically, or change the screen/border color 
combinations. You can also reset the VIC chip to 
its original settings. 

The program is also relocatable. This means 
that it can be placed in the cassette buffer or in 
high memory at the top of BASIC RAM. If you 
select the cassette buffer option, the program 
does not use any of your available BASIC RAM. 


But if you choose the high-memory option, the 
program automatically relocates into the top page 
(256 bytes) of BASIC memory, no matter which 
memory expansion cartridge you may be using. 

The high-memory version automatically seals 
itself off so it is protected from BASIC. And be- 
cause the program is interrupt-driven, you can 
leave it running while you're programming, or 
even while running your BASIC program. But 
remember, the program will be clobbered if you 
choose the tape cassette buffer option and the 
cassette drive is used. 

Type in the program, and SAVE it on tape or 
disk. Heed the usual warning about machine lan- 
guage programs: One mistyped DATA statement 
can freeze up the VIC, so SAVE the program before 
you RUN it. The program will pause a few seconds 
while the BASIC program POKEs the machine 
language utility into memory. 


The Starting Address Is 


Displayed 

The program initially displays a brief page of in- 
structions. At the top of the screen you'll see the 
starting address. To start the program, SYSnnnn 
where nnnn is the number displayed on the in- 
struction page. The program can be stopped by 
pressing the RUN/STOP—RESTORE combina- 
tion. Below is a chart showing the various keys, 
and how they control the program: 


Function | After Typing After Typing After Typing 
s (e += 


inc. screen/ 
borderby1 


dec. screen/ 
borderby1 


inc. screen/ 
border by 10 


dec. screen/ 
border by 10 


Еа 
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move screen 
down 


move screen 
right 


move screen 
left 


The speed of the screen and border color changes 
can be controlled by POKEing memory location 
251. POKEing a value of 1 causes the color combi- 
nations to change the fastest. Values between 2 
and 255 will slow them down; the higher the 
number, the slower the changes. The program 
automatically defaults to a 0, the slowest value. 
For you machine language programmers, memory 
location 251 ($FB) is READ only once by the VIC 
Chip Utility, so this valuable zero page space is 
still available to you. 

After the program has been run and the 
machine language program POKEd into memory, 
you may NEW the BASIC program—it's not 
needed. The utility can be used as a programming 
aid. To find the best visual display, experiment 
with the screen and border color combinations. 
When you see a color combination you like, type 
PRINT PEEK(36879). This will display the current 
color combination value. You may use these color 
combinations in your BASIC programs by POKE- 
ing 36879 with the same number. 


Screen Adjustment Locations 


The registers (memory locations) that control the 
vertical and horizontal screen adjustments are 
36865 (vertical) and 36864 (horizontal). The utility 
simply POKEs various values from 0 to 255 here 
to move the screen. You can use these same mem- 
ory locations to simulate a scrolling effect. Enter 
and run this following short BASIC program 
which will scroll the screen in all four directions: 
10 ЕОҺА-25Т0140:РОКЕЗ6865,А:МЕХТА :геп 1 
20 FORA-140TO25STEP-1:POKE36865,A:NEXTA 
:rem 156 
30 FORA-5TO55:POKE36864,A:NEXTA  :rem 165 
40 FORA-55TO5STEP-1:POKE36864,A:NEXTA 
:rem 64 
Notice that while the screen scrolls up and 
down, the screen format remains normal. How- 
ever, when the screen scrolls right and left, it be- 
gins to distort. This is normal for the VIC chip; 
it's not something wrong with your computer. 
To see how you can produce interesting ef- 
fects in your BASIC program by scrolling up and 
down, enter the following short BASIC program: 


5 PRINT"{CLR}SCROLLING DOWN NOW" :rem 114 
6 PRINT"(DOWN)]SEE YOU LATER!":GOSUB 100 


:rem 214 

10 FORA-25TO140:POKE36865,A:NEXTA :геп 1 
20 PRINT"{CLR}SCROLLING UP NOW" :rem 12 
25 PRINT"(DOWN)HELLO|!" :rem 222 
30 FORA-149TO25STEP-1:POKE36865,A:NEXTA:G 
OSUB 100 :rem 232 

40 PRINT"{CLR}SCROLLING RIGHT" :rem 243 


PRINT"ÍDOWN]BYE NOW!":GOSUB198:rem 135 


60 FORA=5T055:POKE 36864,A:NEXT  :rem 103 
70 PRINT"{CLR}SCROLLING LEFT" :rem 163 
80 PRINT" {DOWN}HELLO":GOSUB 100 :rem 9 
90 FORA-55TOSSTEP-1:POKE36864,A:NEXT:GOSU 

В 100:ЕМр :rem 96 
100 FORT-1TO1000:NEXTT:RETURN :rem 133 
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As you can see, the program displays a message 
on the screen and then scrolls down until it is out 
of sight. While it is at the bottom, the screen is 
cleared, a new message is displayed, and the 
screen is scrolled up again. You can use this tech- 
nique to display any messages you wish to on the 
Screen. 


VIC Chip Utility 

59000 POKE251,0:PRINT"(CLR)ÍDOWN]LOAD IN 
{SPACE}CASSETTE" :rem 227 

59010 PRINT" {RVS}B{OFF}UFFER?" :rem 109 


59020 PRINT"[DOWN]LOAD IN {RVS}H{OFF}IGH 
{SPACE } MEMORY?" :rem 117 
PRINT"{2 DOWN}PRESS {RVS}B{OFF} OR 
{SPACE} {RVS}H{OFF}" :rem 244 
GETAS : IFA$=" "THEN 59040 :гет 39 
IFA$-"B"THEN NN=828:GOSUB68995 :GOTO 
60100 :rem 131 
IFA$="H"THEN POKE56, (PEEK(56)-1):CL 
R:GOSUB62010:GOSUB60005:GOTO63000 
ігеп 53 
GOTO 59000 :rem 60 
FORA=NNTONN+192:READB:POKEA,B:NEXT: 
RETURN :rem 69 
DATA120,169,73,141,20,3,169,3,141,2 
1,3,88,96,165,197,201,39,208,3,206, 
1,144 2 :rem 190 
DATA 201,47 :rem 64 
DATA208,3,238,1,144,201,55,298,10,1 
74,0,144,224,17,240,3,238,0,144,201 
,63,208,10 :rem 145 
DATA174,0,144,224,0,240,3,206,0,144 
,201,34,208,3,32,134,3,201,8,208,3, 
32,237,3,76 :rem 186 
DATA191,234,120,169,147,141,29,3,16 
9,3,141,21,3,88,96,165,197,201,39,2 
0356991920 :rem 239 
DATA3, 238,15,144, 201,47, 208,6, 32,22 
2,3,206,15,144,201,55,208,12,32,222 
13,24 :rem 161 
DATA 173,15 :rem 71 
DATA144,105,10,141,15,144,165,197,2 
21776972082172/99900/3/:56/5157 3 915/1420 
г233,10,141 :rem 207 
рАТА15,144,165,197,201,41,208,3,32, 
60,3,201,8,208,3,32,237,3,76,191,23 
4,162,0,160 :rem 215 
DATAG, 232,224,255, 208,251, 208,196,2 
51,208,246,96,169,5,141,0,144,169,2 


59030 


59040 
59050 
59060 
59070 
60005 
60010 


60015 
60020 


60030 


60040 


60050 


60055 
60060 


60070 


60080 


5,141,1,144 :rem 235 
60090 DATA169,27,141,15,144,96 :rem 2 
60100 PRINT"ÍCLR)]ÍDOWN]TO START SYS";NN 
zrem 115 
60119 PRINT"{DOWN}TO STOP PRESS" :rem 80 
60120 PRINT"RUN/STOP-RESTORE" :rem 133 
60130 PRINT"ÍDOWN]TO CHANGE COLORS" 
:rem 247 
60140 PRINT"PRESS ";CHRS$(34);"C";CHRS(34) 
:rem 3 
60158 PRINT"ÍDOWN]TO ADJUST SCREEN" 
:rem 12 
60160 PRINT"PRESS ";CHR$(34);"S";CHR$(34) 
:rem 21 
60170 PRINT"ÍDOWN]CONTROL WITH F KEYS" 
:rem 191 
60180 PRINT"ÍDOWN]TO RESET VIC CHIP" 
:rem 13 


60190 PRINT"PRESS ";CHR$(34); «";CHR$(34 
) :rem 36 
60200 END :rem 207 
62010 NN=(PEEK(51)+256*PEEK(52) ) : RETURN 
:rem 232 
63000 NO=NN:GOSUB 63519: POKENN+159,P1:POK 
ENN+151,P2 :rem 16 
63002 NO=NN+74:GOSUB 63519:POKENN+62,P1:P 
OKENN+63, P2 :rem 76 
63004 NO=NN+162:GOSUB 63519:POKENN+94,P1: 
POKENN+95 , P2 :rem 134 
63006 POKENN+194,P1:POKENN+195, P2:POKENN+ 
114,P1:POKENN+115,P2 :геп 147 COMPUTER GRADE 


63008 POKENN+132,P1:POKENN+133,P2:rem 175 
63010 NO=NN+177:GOSUB 63510:POKENN-157,Pl 


DATA TRAC 


: POKENN+158, P2 :rem 233 
63015 NO=NN+177:GOSUB 63518: POKENN+69,P1: BLANK CASSETTES 
POKER MD I) prei Lew C-05, C-06, C-10, C-12, C-20, C-24, C-32 
63020 NO=NN+13:GOSUB 63510:РОКЕМЫ--2,Р1:РО == =з — 2 М _ 
KENN+7, P2 :геп 221 F the leadi li (C C 
63030 NO=NN+87:GOSUB 63510:POKENN*76,Pl:P [шше Sed 0G SII: о Canta resis, 
OKENN+81, P2 trem 86 new, longer length C-12's (6 minutes per side) provide 
63588 GOTO 60100 :гет 46 the extra few feet needed for some 16K programs. 
63510 P2-INT(NO/256):P1-NO-(P2*256):RETUR BASF-LHD (DPS) world standard tape. 
N :rem 217 @ 


Premium 5 screw shell with leader. 


c Internationally acclaimed. 
Thousands of repeat users. 


< Error Free e Money back guarantee. 


COMPUTES Gazette 


Toll Free Subscription Order Line 


800-334-0868 E saa a Supping sir ыс | бш шшшде с Saas 


500 Boxes 13€ ea. е Shipping $10./500 | w/o boxes 


In NC 919-275-9809 (Free Caddy offer does not apply) Includes edge labels 


TRACTOR FEED o DIE-CUT | 474 index card 

BLANK CASSETTE LABELS 

WHITE: s3.00/100 0.00100 | FREE : 
COLORED LABELS o Pastels- | 1 CADDY. WITH EVERY — 


\N Red, Blue, Green, Yellow, Lavender 
Е ecd j 4 DOZ. CASSETTES PURCHASED 
N 54.00/100 530.00/1000 (does not apply to 500 quantity offer) 


= Call: 213/700-0330 ©, ммеоте suwa (SS 
ORDER MAIL тм 9525 Vassar Ave. #G 
NOW.. D One YORK 10 Chatsworth, CA 91311 


МІС? 20 OWNERS 


Fulfill the 
expansion needs 
of your computer 


with the gna == = ыш шы mm mm ORDER FORM m шш шш шш шш шш шш шр 
B [лем 1 DOZEN 2 DOZEN TOT! Each cassette * ш 
ВА M-SLOT С-05 D 70 |D 1300 includes two YORK 10 [| 
[| D —— EN B 7% ТАБЫ. Е labels only. Boxes аге 
ADI zar alli sold separately. We 
MACHINE qo mU = И. 
ЕЛІ — ll] 82% = | ros E as being the fastest and 
| | | - E EF safest. If you need ship- | 
This versatile memory and slot expansion peripheral "Шар фу 7% C) 400 [ ШЫН д, | 
for the Commodore Vic-20 Computer consists of a [| White Labels |Г) 300100 [:]620:00/1000H | Божан = 
plug-in cartridge with up to 24KBytes of low power [| C s se ry «corto C3 3000/100 NOTE: Additional | 
CMOS RAM and 3 additional expansion slots for DESCRPTION PRICE | ошату старе оао | 
ROM, RAM and І/О. Тһе cartridge also includes а ге- [| Storage Caddy 295 wi Shipments to AK, HI 
set button (eliminates using the power-on switch) [| = 508 TOTAL | ne [| 
and an auto start ROM selection switch. Сай. residents add sales lax | Canada ЕТМ тоз в 
І Shipping /handling (any quantity — using prices above) | 3.50 peal Ж 
#RSM-8K, 8K RAM + 3 slots [| | атна Е | 
#RSM-16K, 16K RAM + 3slots .... I š TOTAL Ask about our | gj 
#RSM-24K, 24K RAM + 3slots .. CHECK OR MO. Charge to DUPLICATING 
J ENCLOSED O Credit Card: visa О MASTERCARD O SERVICE [| 
y Г] PLEASE SEND QUANTITY DISCOUNTS 
We accept checks, money order, Visa/Mastercard. Add [| [| 
$2.50 for shipping, an additional $2.50 for COD. Mich- (Оте Е Sk Sr ЕЕС А. аша I 
igan residents add 4% sales tax. Personal checks— [| 
allow 10 days to clear. * Trademark of Commodore Кере a с анына caue 
K2 ГО суы i ит, lost Te С | 
ELECTRONICS DESIGN CORPORATION L (Cj y еее as торан SiateZz pu ы сене нын I 
3990 Varsity Drive • Ann Arbor. MI 48104 • (313) 973-6266 [| Signature Phone ' 
| Computer make & model ———————————— Disk? (y/n) —— 


BOD OO rr rS =l 


MACHINE LANGUAGE FOR BEGINNERS 


RICHARD MANSFIELD, SENIOR EDITOR 


Talking To A Disk 


Because several people have asked for information 
on disk communication, we'll interrupt our con- 
struction of an all machine language game and 
create a useful utility program this month. It will 
illustrate how to get information directly from a 
disk to a machine language program. 

After you've had a disk drive for a few 
months, some of your disks are bound to get 
crowded. You'll have backup disks, old disks 
you've retired for one reason or another, and disks 
you haven't used for a while. Housekeeping is 
called for. 

From time to time you'll want to go through 
your entire disk collection, eliminating duplicated 
programs (unless they're deliberate backups) and 
scratching unwanted, revised, or unfinished pro- 
grams. This cleans up your collection and makes 
itless likely that you'll need to waste time later 
when looking for a particular program. You put 
all your utility programs on one disk, all the games 
on another, and generally organize things. What's 
left after this housekeeping is the best version of 
everything, logically arranged. 


А Disturbance In Light 


But this cleanup can be a tedious process if you 
have to LOAD and LIST each program in a large 
collection. Tedious and treacherous: You might 
get so distracted that you scratch something valu- 
able. The "Slist" program we'll write this month 
can make this job easier. It will quickly show a 
partial listing of programs from a disk, but, unlike 
an ordinary list, the program won't be loading. 
No memory is affected. The program doesn't enter 
the computer except to slide across the screen 
and then evaporate as the photons scatter off the 
top of the TV. It's information in its purest form— 
just a disturbance in light. 

To keep the ML simple, no BASIC keywords 
will be listed on screen, but programs are easily 
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identified from REM statements, internal text, 
and the like. 

Program 1 is a disassembly of the 64 version. 
The VIC version is identical except that the pro- 
gram resides in the VIC from address 12288 (in- 
stead of 49152) on up. Let's look at it step by step. 

First we load the X register with the number 
1 to signify the file number. Then JSR (Jump to 
SubRoutine) within the computer's ROM memory 
at address 65478 which performs all the steps 
necessary to prepare a file to be read by the 
computer. 

Next, we throw away the first six bytes in the 
file. We don't want them. This could be called a 
“suction” routine because, like a vacuum cleaner, 
it pulls bytes out and then discards them. The 
first two bytes it gets from the disk point to the 
disk location of the next data block in the opened 
file. The disk drive needs this information, but we 
don't. Moving from block to block will be handled 
automatically for us by the intelligence within the 
drive. The next two bytes are a pointer to the next 
line number in a BASIC program on disk. The 
following two bytes are the current line number. 
We're not going to be listing line numbers—that 
would make the program more complicated—so 
we can ignore all of this information. 

We step down through six DEX instructions, 
JSRing each time to 65487, the routine which 
fetches a byte. It's essentially the same thing as 
GET#. Each time we JSR to 65487, the accumulator 
register holds the value of the next byte on the 
disk. But we just ignore each byte and fetch the 
next one. 

At address 49165 we start our main loop by 
once again jumping to the get-a-byte subroutine. 
Before working with the byte in the accumulator, 
we first test for the end of a program. We load the 
number from address 144 into the Y register. ST, 
the current input-output status variable, is always 


Get Supertax by Rockware Data 
and relax on April 15th... 


SUPERTAX 


SECOND SUCCESSFUL YEAR! ө THOUSANDS ALREADY IN USE! 


Use SUPERTAX personal income tax programs to calculate your tax liability now and have plenty of 
time to make year-end investment decisions to improve your position. SUPERTAX was specifically 
created for Commodore 64 users by a practicing CPA with a Master's degree in tax accounting. 
Highly acclaimed by tax pros, SUPERTAX is easy to understand and a pleasure to work with. 


“ SUPERTAX PROGRAMS are fully screen- + SUPERTAX DATA сап be stored on cassette 


prompted and include a manual loaded with 
valuable tax information and guidance. 

+ SUPERTAX instantly recalculates your entire 
return when you change any item. 

* SUPERTAX is available on cassette and diskette. 


SUPERTAX I SUPERTAX II 
Using either screen or printer output, SUPERTAX 
| generates clear and concise summaries of Page 
1 and 3 and Schedule A of FORM 1040 allowing 
you to see at a glance and to quickly comprehend 
your tax situation. This program also prints an 
OVERALL SUMMARY of the return showing 
Adjusted Gross Income, Itemized Deductions, 
Taxable Income, Regular Tax, Income Averaging 
Tax, Minimum Tax and Payment Due or Refund— 
all of which are calculated by the program. 
SUPERTAX I also calculates the moving expense 
deduction, investment credit, taxable capital gains, 
political and child care credits, medical limitations, 
and much more. Input is fast and easy and 


and diskette. 7 

• SUPERTAX is available at 50% off to prior 
purchasers for all subsequent year's programs. 

* SUPERTAX is an essential addition to your per- 
sonal software library—best of all it's tax deductible. 


Includes the efficient SUPERTAX I program 
as well as the more detailed SUPERTAX II 
program which makes all of the SUPERTAX | 
calculations, but which also PRINTS THE 
INCOME TAX RETURN. This program prints 
page 1, page 2, Schedules A, B, W, and G 
(income averaging) of the FORM 1040 as well 
as FORM 3468 (investment tax credit) on 
standard government forms or on blank com- 
puter paper for use with transparencies. Any 
input item can be changed in seconds and the 
entire return is recalculated almost instantly. 


Diskette only $89 


SUPERTAX III 

This package 

includes both the 

SUPERTAX І and SUPER- 

TAX II programs PLUS a 

program to calculate and print 

Schedule C of the FORM 1040. 

Also included is a stand alone 

depreciation program which calculates 

and prints your depreciation schedule 

using both the old rules and the new ACRS 
rules. Output from the depreciation program 
is designed to serve as a supplement to IRS 


FORM 4562. Diskette only $99 


changes can be made in seconds. This program 
actually makes tax planning a breeze. 


Cassette or Diskette $79 


NOTE: Printing on government forms 
requires friction feed printer. 


Products shipped FOB Dallas, TX 
Commodore 64 is a trademark of 
Commodore Business Machines 


TO ORDER Call Toll Free 1-800-527-4171 In Texas Call 214-739-1100 
MasterCard, VISA, Money Orders, Bank Checks and COD Orders Accepted 


(add 3% surcharge for credit card processing) (add $5.00 for COD) 


For Brochure WRITE 

Financial Services Marketing Corp. 
10525 Barrywood Drive 

Dallas, Texas 75230 


TELSTAR 64 


Sophisticated Terminal Communications Cartridge for the 64. 


*PFO* 10D 00D CP D1 D2 BELL 12:30:00 
(TELSTAR's Status Line) 


Don't settle for less than the best! 


* Upload/Download to/from disk or tape. 

* Automatic File Translation. 

© Communicates in Industry Standard ASCII. 

Real-Time Clock plus Alarm Clock. 

° Line editing capability allows correcting and resending long command lines. 
9 Quick Read functions. 

* Menu-driven. 

* Similar to our famous STCP Terminal package. 

* Works with Commodore Modems and supports auto-dialing. 


The best feature is the price — only $49.95 (Cartridge and Manual) 


10:14:36 


Machine.Language Monitor Cartridge 
for the CBM 64 


More than 20 commands allow you to access the CBM 64's Microprocessors 
Registers and Memory Contents. Commands include assemble, disassemble, 
registers, memory, transfer, compare, plus many more. 


Someday every CBM 64 owner will need a monitor such as this. 
Cartridge and Manual — $24.95 


aSTrer 
"muU LE 


8Kin30Seconds YA 
for your VIC 20 or CBM 64 


Ifyou own a VIC 20 or a CBM 64 and have been concerned 


about the high cost of a disk to store your programs on 
worry yourself no longer. Now theres the RABBIT. The RABBIT 
comes in a cartridge, and at a much, much lower price 
than ОЕК disk. And speed . . . this is one fast RABBIT. 
With the RABBIT you can load and store on your CBM 
datasette an 8K program in almost 30 seconds, compared 
lothe current 3 minutes of a VIC 20 or CBM 64, almost os 
fast as the 1541 disk drive. 
The RABBIT is easy to install, allows one to Append 
Basic Programs, works with or without Expansion 
Memory, апа provides two data file modes. The 
RABBIT is not only fast but reliable. 
(The Rabbit for the VIC 20 contains an expansion con- 
neclor so you can simultaneously use your memory board, etc) 
THE BEST 


For CBM 64, PET, APPLE, and ATARI 
Now, you сап have the same professionally designed Macro 
Assembler/Editor as used on Space Shuttle projects. 
ө Designed to improve Programmer Productivity. 
* Similar syntax and commands - No need to relearn peculiar 
syntaxes and commands when you go from PET to APPLE to 


$39.95 


NOW $59.95 


ө Coresident Assembler/Editor - Noneed toload the Editor, then 
the Assembler, then the Editor, etc. 
* Also includes Word Processor, Relocating Loader, and much 
more. m 
* Powerful Editor, Macros, Conditional and Interactive 
Assembly, and Auto - zero page addressing. 
Still not conviriced; send for our free spec sheet! 


3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919) 924-2889 (919) 748-8446 
Send for free catalog! 
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being updated in address 144. If it isn't zero (BNE, 
Branch Not Equal to zero), the program is forced 
down to 49200 which JSR's to the routine in BASIC 
that stops communication. And we then RTS back 
to BASIC. A reading error or an end-of-program 
signal from the disk will flip ST out of its zero 
state. 

If we don't get sent down to this RTS back to 
BASIC, however, we've found a byte that's part 
of the program or file we want to see on screen. 


An Undisturbed Accumulator 

Up in line 49165, we handed a byte to the ac- 
cumulator from the disk. It's still in there. Nothing 
we've done has disturbed the accumulator. In 
line 49172, we CoMPare the accumulator to 0. 
Since each BASIC line ends with a true 0 (the 
number zero is stored as a 48 in memory and on 
disk), we can signify this end-of-line on the screen 
by printing a carriage return when a zero comes 
in from the disk. 

If itis a 0, we BEQ (Branch if EQual) to the 
little subroutine at 49190 which does two things. 
First, it prints a 13 to the screen, which has the 
effect of causing the cursor to move down one 
line (carriage return). The BASIC routine at 65490 
will put whatever is in the accumulator on the 
screen, even nonprinting characters like 13. Sec- 
ond, we load the X register with 3 and jump up to 
the suction routine to get rid of the two-byte line 
link and the two-byte line number. 

It's a two-edged sword that the BASIC PRINT 
routine will send whatever it gets to the screen. 
There are some nonprinting characters (delete, 
cursor movements, colors, uppercase shift) that 
would play havoc with our listing. To eliminate 
them, we've got to perform two more compares— 
throwing out any character coming in from the 
disk which is below 32 or above 128. Lines 49176- 
49182 do just that. If below 32, BCC (Branch Carry 
Clear) up to the fetch-the-next-byte routine at 
49165. Likewise, BCS (Branch Carry Set), if above 
128. BCC takes effect if something is less than 
something else. BCS takes effect if something is 
more than something else. 

Finally, if the byte in the accumulator passes 
all these tests, we come to line 49184 which JSR's 
to BASIC's PRINT subroutine in ROM memory. 
Then we JMP (JuMP) back up to the fetch-a-byte 
routine and look for the next character. 

You can either enter this machine language 
program into your assembler or use one of the 
BASIC loaders, Programs 2 and 3, to POKE it in 
for you. Don't forget, VIC owners will need at 
least 8K of expansion memory and will need to 
POKE 56,48 to keep the machine language routine 
safe up in high RAM. 

To use Slist, first OPEN a file on the disk from 
BASIC: 
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OPEN 1,8,3,“NAME” 


And then SYS 49152 (64) or SYS 12288 (VIC). 
You'll see whatever program you gave as NAME 
come rapidly slisting down your screen. To see 
another, just replace NAME and SYS again. 


Program I: vic And 64 Slist 


49152 LDX # 1 
49154 JSR 65478 


Remove Disk Data 


49157 LDX * 6 

49159 JSR 65487 

49162 DEX 

49163 ВМЕ 49159 
Main Loop 

49165 JSR 65487 

49168 LDY 144 

49170 BNE 49200 
49172 СМР * ø 

49174 ВЕО 49190 
49176 СМР % 32 

49178 BCC 49165 
49180 СМР # 128 

49182 BCS 49165 
49184 JSR 65490 

49187 JMP ===> 49165 
Remove Line Z And Link 
49190 LDA # 13 

49192 JSR 65490 

49195 LDX # 3 

49197 JMP ---> 49159 
Close Channels 

49200  JSR 65484 

49203 RTS 


See program listings on page 142. @ 


INCOME TAX BY SOFTAX 


DO YOUR 1983 INCOME TAX RETURN ON THE 


COMMODORE 64 


PREPARE YOUR OWN RETURN QUICKLY AND EASILY. DO RETURNS 
FOR OTHERS FOR CASH! COMPARE INVESTMENT STRATEGIES. 


DISKETTE ONLY: $69.50* 4555. 


Form 1040, Schedules A, B, C, D, E, G, SE, W and Form 
2441. Menu Driven. Print File and Input Storage Capability, 
Form 1040 with the 1984 Tax Rates. (See what that tax 
shelter may be worth on next year's return.) 

Coupon included for a discount on the 1984 version of 


TAX 
DEDUCTIBLE 
YOU GET: 
BONUS: 
DISCOUNT: 


OPTION: For $5.00 more ($74.50)* you also get the Minnesota 
Individual Income Tax Return. (A bargain for the toughest 


return in the land.) 
SOFTAX, INC. P.O. BOX 332 ST. PAUL, MN 55102 
(612) 224-7477 


*Plus $1.50 POSTAGE. MINNESOTA 
RESIDENTS, ADD 6% SALES TAX. 


COMMODORE 64 is a Trademark 
of Commodore Electronics, LTD 


 PROSSS 


The Professional Systems People And 


MJ [C RIO] 


SOFTWARE 


PERSYS 

VIC 20, C-64, 8032, 8096 & B-Series 
PERSONAL FINANCIAL SYSTEM 
A complete financial package for home 
and small business, beginning at $69.00 
on tape. 


SBSys 

8032, 8096 & B-Series 

THE SMALL BUSINESS SYSTEM 
Available for 8050, 8250 and hard disk 
drives. GL, AP, AR, INV. and payroll 


Present Products From 


-« commodore 


The Software That Makes Them Work! 


ГО [ЕХ] 


These are sample unit prices. We carry 
support items, cables, games... WE HAVE IT! 


CBM PRODUCTS 


8032 Computer $ 619.00 
8050 Disk Drive 979.00 
8250 Disk Drive 1279.00 
9060 Hard Disk 1979.00 
8023 Printer 529.00 


6400 Printer 1399.00 


C-64 STUFF 


C-64 Computer 


$219.00 


8032, 8096 & B-Series. 
The total truck brokerage accounting 
system. Call for free intro consulting. 


CUSTOM PROGRAMMING 
& REPAIR SERVICE 
Call for rates. 


VISA & MasterCard. Add 3% Surcharge. 


Prices for mail order only, subject to change without notice. 


modules beginning at $299.00! Call for 1541 Disk Drive 249.00 

specific pricing. 1702 Monitor 249.00 
1526 Printer 339.00 

VERTICAL PACKAGES: 1600 Modem 69.00 
80 Col. Card 59.00 

LEGISYS MSD Dual & Single Drives CALL 

8032, 8096 & B-Series. 

The total legal office information, 

accounting and tickler system. Send $1 for catalog, refundable on first order. 

LOADSYS Call Toll-Free by dialing: 


Outside Texas: 


1-800-221-WORX 


Inside Texas: 


1-800-692-4265, 
wait for beep, then dial 008-3378, 
wait for tone and dial 993, 

or Lubbock 806/797-2623, 
Dallas/Ft. Worth 817/589-2622. 


[М1 [Со] [W[O]R]X] 


4210 D 50th St. Lubbock, TX 79413 


Numeric Keypad 


Charles Kluepfel 


Turn your keyboard into a "Numeric 
Keypad" for more efficient numeric input. 
The program lets you toggle to standard 


keyboard or numeric keypad. Written for the 


64, we've added a version for the VIC. 


You could type in numbers much faster and with 
fewer errors if the VIC-20 and Commodore 64 
had a numeric keypad. This program offers this 
handy feature by redefining a set of keys to repre- 
sent numbers instead of letters. 


VIC Notes On Numeric Keypad 


Kevin Martin, Editorial Programmer 


The VIC version of "Numeric Keypad" oper- 
ates the same way as the 64 version, but uses 
an entirely different technique. 

Program 2 is a BASIC loader which 
POKEs machine language to the top of BASIC 
and then executes a SYS to start the interrupt. 
There is one major operating difference from 
the 64 version: Instead of using CTRL-N to 
start, it uses CTRL~. 

The 64 version POKEs BASIC and the 
Kernal ROM into RAM and then modifies 
the Kernal. This luxury isn't available on the 
VIC, but there is a way around it. The 
hardware interrupt can be used to change 
the characters stored in the keyboard buffer 
to different values. 

To use this program with another, first 
LOAD and RUN. Since it resets the top of 
BASIC pointers, be sure your program 
doesn't reset them. If it does, Numeric 
Keypad will not function correctly. 


Technical Modifications 


The more technically inclined might be inter- 
ested in a few tricks used in the VIC version. 
The program uses the interrupt by pulling 
the А, X, and Y registers from the stack, 


storing them in memory, and pushing them 
back. 

Then, it pushes the high and low bytes 
of the new return from the interrupt address, 
the processor status byte, and the A, X, and 
Y registers to the stack. It then jumps to the 
normal interrupt routine. We push those 
bytes so that after it executes the RTI in the 
interrupt routine it will return to the interrupt 
instead of the main routine. 

It then loads the keypress value in 197 to 
determine if the back arrow is being pressed. 
If it is, bit 2 of address 653 is checked to see if 
the CTRL key is being pressed. If it is, we 
jump to the routine to see if there is a value 
for any of the U, I, O, J, K, L, or M keys in 
the keyboard queue. If there is a value for 
any of these, they are changed to either a 4, 
5, 6, 1, 2, 8, or 0, respectively. We then jump 
to the ending routine. 

If either the back arrow or the CTRL key 
is not pressed, we jump to a routine to deter- 
mine if the flag at 251 is set. If that flag is set, 
we go to the routine to change the characters 
in the keyboard queue. If the flag is not set, 
we jump to the ending routine, which pulls 
the A, X, and Y registers off the stack and 
executes an RTI to get back into the program. 
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COMMODORE OWNERS... 


there is no need to spend thousands 
of dollars for a new business computer! 


Nor is there need to go through the hassle and 
expense of learning a complicated new system. 


An easy expansion will.convert your Commodore? into a powerful business computer that will 
have you running productive business programs as quickly as 1,2... plug it in and grow! 

Begin with the reliable new MSD® Super Disk ... the only disk drive readily available for 
Commodore computers. Gain instantaneous random access to programs and information, and 
save valuable time in executing your programs. 

Next ... interface the new, state-of-the-art dot matrix printer ... the Panasonic? KX-P1060 for 
hard copy that will support and document your task. 

Add expansion modules for greater power and up to 64K memory. Our terminal emulators allow 
you to communicate with other computers, such as the SOURCE, DOW JONES or COMPUSERVE. 
Complete the expansion process with software applications to address accounting, word 
processing, and other business requirements. 

Don't spend thousands of dollars on a complicated РС... expand your Commodore and get down 
to business. The expansion is so easy you will be up and running the same day. 

Call or come by today to learn more about Your Business Softwares "Expand Your Business Plan." 


Panasonic KX-P1060 $399.00 

cans? 589 SUPER DISK SPECIAL! 

Wasi Oa WS 4995 Single Disc Drive Dual Disk Drive 

TE Terminal Emulator Cassette ) plus the faster plus the faster 
ТЕ Termi i А 

ELEM ME : IEEE Interface IEEE Interface 


$429.00 $749.00 


SOFTWARE TO ORDER, CALL TOLL FREE 


Accounts Receivable/Billing ` Д 800/ 527-5341 
с co Texas and Canada 214/526-3348 


Inventory Management I ; 

шш T ) MOST ORDERS SHIPPED SAME DAY! 
ny 3 of the above programs À 

Calc Result | FREE SURFACE FREIGHT 

Home Accounting Plus I UPS Blue Label add 53.00 

Bank Street Writer i 

Typing Tutor 

Speed Reader II 

First Class Mail 

Oracle (data base) 

Tax Advantage 

Multi Plan 

Quick Brown Fox 


Prices are for prepaid orders only and reflect a 
cash savings; send a cashier's check or money 
order. Charge card orders are slightly higher. 
All items subject to availability and prices 
subject to change without notice. Overseas 
orders do not include shipping and handling. 


€ signifies manufacturers’ trade marks 
and copyrighted products. 


VS ==: 
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When you run “Numeric Keypad,” your 
computer will behave normally until CTRL-N is 
pressed. The cursor will disappear until you press 
another key. Then the M, J, K, L, U, I, and O keys 
will be 0, 1, 2, 3, 4, 5, and 6. By using these along 
with the numeric keys 7, 8, and 9, you have a 
numeric keypad. Pressing CTRL-N again toggles 
the keyboard back into its normal mode (again 
causing the cursor to disappear until you press 
a key). 

You can put press-apply transfer numbers on 
the affected keys to help you remember which 
number each key represents. You should use 
very small ones, so they won't interfere with the 
normal identification of the keys. (Transfer letters 
and numbers are available at art supply stores.) 


Use Numeric Keypad In A 
Program 


You also can activate and deactivate the numeric 
keypad from a program, in anticipation of numeric 
or nonnumeric input, by POKEing location 50216 
with 255 or 0 respectively. The user can always 
override this with CTRL-N. (CTRL-N is never 
passed to the program, but serves only the toggle 
function.) Just don't POKE any value other than 0 
or 255, as that would prevent you from toggling 
with CTRL-N. 


ES ^g xs 
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program series for the 64. 


— JMADREVAOGA - 


= Your personal professional address-file-system. Up їо 620 — 
addresses per disc in direct access. Including 5 extra lines for 


k individual text/record. Totally menue dave ег 
Powerful editing and back-up facilities. Ly $60 


ом 
a Several hardcopy features. = 
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= additional hardware, find & replace, enhanced blockhandling, 
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program series for the 64. 
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|_ The professional wordprocessor with more than 80 functions 
like multi-color selection, up to 120 columns/line without 


direct-access to SM-ADREVA-files, and all 
= the other usual features. 


— PLACE YOUR CHECK OR MONEY ORDER NOW! 
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If you prefer that the keypad start out activated, 
change the next-to-last DATA item in line 520 from 
0 to 255. 


Redefining The Keys 

To redefine the 64 keys, we transfer the Kernal 
from.ROM into RAM, change it to intercept the 
M, J, K, L, U, I, and O keys, and convert the data 
to the appropriate numbers. 

Lines 3 and 4 POKE the machine language 
into an unused area of memory from the DATA 
statements in lines 500—560. 

Lines 10 and 20 transfer the BASIC interpreter 
and the Kernal from ROM to RAM with the same 
addresses, so we can modify them. The Commodore 
64 Programmer's Reference Guide, page 261, states 
that turning off bit 1 in location 1 switches only 
the Kernal addresses to RAM; actually it affects 
both the Kernal and BASIC address ranges. 

Line 25 merely signals that the transfer is 
complete (it takes about a minute). 


The Intercept Routine 


Line 30 sets up the routine which intercepts 
keyboard characters. It is put at the end of the 
routine that pulls a character from the keyboard 
buffer. 

Finally, line 40 activates the modified Kernal 


by turning off bit 1 of location 1 (changing the 
value in location 1 from 55 to 53). Once this is 
done, the change has been made, and pressing 
CTRL-N toggles between a numeric keypad and 
the normal usage of the M, J, K, L, U, I, and О 
keys. 


А Color Memory Bonus 
A couple of bonuses have been included in lines 
31 and 32. Line 31 changes the portion of the 
Kernal on newer 64s that puts the backeround 
color into the color memory for screen locations 
being cleared. Instead of putting the background 
color there, it will now put 1 (for white), so that if 
addresses 1024 to 2023 (decimal) are POKEd, a 
character will appear. (See “Commodore 64 Video 
Update,” COMPUTE!s GAZETTE, July 1983, page 44.) 
POKEing 1000 locations as suggested there 
takes a few seconds—not something to do for 
every PRINT of a screen clear. 


Choose À Color 


In the normal mode, printed characters will be 
light blue on a dark blue background, while 
POKEd characters will be white. Change the 
POKE to location 58587 in line 31 to some other 
number if you would like a color different from 
white for POKEd screen characters. Of course, if 
you have an older 64 which does not clear color 


Here comes the new generation of SM's 


GOLDEN TOOL 


program series for the 64. 


e A ISIIGA 


[—-- This index-sequential file manager gives you a new dimension 
on direct access files. Up to 40 keys, various length for each 
record and up to 10 files can be handled at the 
same time by this sophisticated module. How could your 
programs survive without SM-ISM? 


PLACE YOUR CHECK OR MONEY ORDER NOW! 
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Here comes the new generation of SM's 


- COLDENTOOL — 


program series for the 64. 


- SS / KITGA 


|. The famous programming tool with powerful basic extentions -- 
like merge, find, renumber, dump, trace, enhanced 

|—. floppy-monitor (disc-doctor) and high efficient machine-language- -- 
monitor with built-in assembler, diassembler, trace and lots 
of more helpful features-really a golden tool! = 


PLACE YOUR CHECK OR MONEY ORDER NOW! >=] 


memory to the background color, leave out this 
patch (line 31). 

Line 32 eliminates the printing of a question 
mark and space in an INPUT statement prompt. 
This makes it possible to write: 


100 INPUT "TITLE:";T$ 
and have the resulting screen look like 
TITLE:COMPUTE's GAZETTE 


In any place where you really want the ? and 
the space, you can put them inside the quotes. 


See program listings on page 143. @ 
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FREE CATALOG! 
"64 SHOPPER 


Your complete source for C-64 and Vic software! 
You've never seen anything like it!! 
USE READER'S SERVICE CARD, OR WRITE DIRECTLY TO: 


!64 SHOPPER 
BOX 187, FRASER, MI. 48026 
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Quick Fix 
For Color RAM 


A Fast And Easy Way 
To Avoid ‘Invisible Characters’ 
On The Commodore 64 


David Gross 


A previous article, "Commodore 64 Video Up- 
date" (July 1983), discussed an internal change 
by Commodore to the 64's operating system. 
Late-model 64s do not automatically fill color 
memory with white, so characters POKEd di- 
rectly into screen memory merge with the back- 
ground color and are "invisible." This article 
presents a quick, simple solution. 

реза де сај 


"Commodore 64 Video Update” іп the premier 
issue of COMPUTE!’s GAZETTE mentions that, when 
the screen is cleared, late-model Commodore 64s 
fill color memory with the screen background 
color. This renders all characters that are POKEd 
(not PRINTed) onto the screen "invisible," be- 
cause they are the same color as the screen. Early- 
model 64s filled color memory with a contrasting 
color (white) when the screen was cleared. 

The earlier article suggested an easy one-line 
programming solution: a FOR-NEXT loop to 
POKE the appropriate color code (such as 1 for 
white) into color memory. The line looks like this: 


FOR X=1 TO 1000: POKE 55295 + X,1: NEXT 


It works fine, but takes about ten seconds to exe- 
cute. Luckily, there is an even easier and much 
faster way. 


Let The 64 Fill Color RAM 


First, simply set the screen to the color you want 
the characters to be by POKEing the color code 
124 COMPUTE!’s Gazette April 1984 


This starfield, POKEd directly into screen memory, will 
appear on both older- and late-model 64s because of a quick-fill 
method for color memory. 


into memory address 53281. Next, print a CLR/ 
HOME character or CHR$(147). Last, reset the 
screen to the background color you want. Do not 
clear the screen a second time! Color memory will be 
set to give POKEd characters the first screen color 
that you used. That's because whenever you 
clear the screen, the new 64s automatically fill color 
memory with the color code found at 53281. 

For example, suppose that you want to create 
a random starfield, white on black. The answer is 
the program below. It places 100 white stars at 


CodePro-64 (c) 1983, SMA 


Overview 
0 — Using CodePro-64 
1 — СВМ-64 Keyboard Review 


7 BASIC Tutorial 
2 — Introduction to BASIC 
3 — BASIC Commands 
4 — BASIC Statements 
5 — BASIC Functions 


Graphics & Music 

6 — Keyboard GRAPHICS 

7 — Introduction to SPRITES 
8 — SPRITE Generator 

9 — SPRITE Demonstrator 

A — Introduction to MUSIC 
B — MUSIC Generator 

C — MUSIC Demonstrator 


Other Options 
K — Keyword Inquiry 
R — Run Sample Programs 


Select Choice or hit f7 for Default 


Now you can leam to code in BASIC and 
develop advanced programming skills with 
graphics, sprites and music—visually. You 
learn by interacting with CodePro-64, a new 
concept in interactive visual learning. 

SEE PROGRAM EXECUTION 

Imagine actually seeing BASIC state- 
ments execute. CodePro-64 guides you 
through structured examples of BASIC pro- 
gram segments. You enter the requested data 
orlet CodePro-64 do the typing for you. (It 
will not let you make a mistake.) 

You step through and actually see the 
execution of sample program statements by 
simply pressing the space bar. CodePro-64 
does the rest. You see statements with cor- 
responding graphics and variable value 
displays. 

EXTENSIVETUTORIAL 

CodePro-64's extensive tutorial guides 
you through each BASIC command, pro- 
gram statement, and function. You get clear 
explanations. Where appropriate, you invoke 
BasicView to see examples execute and 
watch their flow charts and variables change. 

By seeing graphic displays of program seg- 
ment execution you learn by visual example. 
You learn faster and grasp programming 
concepts easier with CodePro-64 because 
you immediately see the results of your input. 

You control your learning. You can go 
through the tutorial sequentially, or retum to 
the main menu and select different topics, or 
use keywordsto select language elements to 
study. You can page back and forth between 
screens within a topic at the touch ofa func- 
tion key. 

Once you have practiced and mastered the 
BASIC language elements you move on to 


os 
30 FOR 1= 10 TO 20 
'STEP 2 


ЕТЕРІ 
30 NEXT I 
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cunnenr vacots 
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КЕРЕ SPEE EAN TO DEMONSTRATE EXECUTION 


Fi MAIN F3 CURRENT F5 NEXT Fo PB 


Main Menu 


more advanced concepts. You learn about 
sprite and music programming. 

SPRITE GENERATOR 

& DEMONSTRATOR 

CodePro-64's sprite generator lets you 
define your own sprites on the screen. You 
learn howto define sprites and what data 
values correspond to your sprite definitions. 
(You can then save your sprite data to a 
diskette file for use in your own programs.) 
You can easily experiment with different 
definitions and make changes to imme- 
diately see the effects. 

We also help you learn to program with 
sprites by giving you a sprite demonstrator so 
you can see the effect of changing register 
values. You can experiment by moving your 
sprite around in a screen segment, change its 
color and see the effects of your changes. You 
leam by visual examples. 


MUSIC GENERATOR 
& DEMONSTRATOR 
Our Music Generator and Music Demon- 

strator will provide hours of instruction and 
creative enjoyment. From the beginning of 
your instruction you can compose simple 
tunes on the screen using the generator. 
Once you've completed a composition you 
can save the tune and its associated SID 
parameters to a diskette file. Our music sam- 


OUR GUARANTEE 


We guarantee your satisfaction. You 
must be satisfied with CodePro-64 for 
the Commodore-64. Try it for 10 days 
and if for any reason you are not satisfied 
return it to us (undamaged) fora full 
refund. No risk. 
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SYSTEMS 
MANAGEMENT 
ASSOCIATES 


MUSIC GENERATOR 


NOTE NUMBER МАХ NOTE 


MOVE NOTE UP OR DOWN. LEFT OR RIGHT WITH. 
CURSOR KEYS, THEN HIT RETURN 


PRESS SPACE BAR TO PLAY NOTE 


DURATION 
LOOP 


F2:PLAY а SHOW MUSIC F4-PLAY ONLY 


A new concept 
in interactive visuql 
learning. 


CodePro-64" 


ple program can be used alone or incorpo- 
rated into your own programs to read the 
saved music file and replay your songs. 

Our music demonstrator lets you experi- 
mentwith various combinations of music 
programming parameters and hear the 
results. All you do is enter rows of SID 
parameters on the screen to create a particu- 
lar sound. Then you hear each sound by 
playing the "keyboard organ’ in real time as 
you shift from row to row of SID parameters. 
By seeing your input and hearing the result 
you quickly learn how to create new musical 
sounds and special sound effects. 

Whether you're a beginning programmer 
огап experienced professional, CodePro-64 
will help you improve you Commodore 64 
programming skills. We're sure because 
CodePro-64 was developed by a team of two 
professionals with over 25 years of software 
development experience. 

CodePro-64 is a professional quality edu- 
cational program for the serious student of 
personal computing. And it's fully guaran- 
teed. Order yours today. 

HOW TO ORDER 

Order your copy of CodePro-64 today by 
mail or phone. Send only $59.95 plus $3.00 
shipping and handling to: 

SYSTEMS MANAGEMENT ASSOCIATES 
3700 Computer Drive, Dept. G-1 
Raleigh, N.C. 27609 

Available on diskette only. MasterCard /- 
VISA accepted. For faster service on credit 
card orders, call toll free 1-800 SMA-RUSH. 
(1-800-762-7874). Dealer inquiries invited. 


Commodore 64 is a trademark of Commodore Business 
Machines, Inc. 
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random locations on a black screen. The program 
runs in half the time it would take if each star's 
corresponding color memory location were set 
individually. 

This technique can be very useful when con- 
verting Commodore PET programs that POKE to 
the screen. Simply change the screen memory 
addresses to fit the 64. Then, before any CLR/ 
HOME is printed in the program, add a command 
to set the screen to the desired character color. 
Remember to set it back to the screen color im- 
mediately after the CLR/HOME is printed each 
time. 


AStar is Born. 


Quick Fix For Color RAM 
10 РОКЕ 53281,1:REM SET SCREEN COLOR TO D 
ESIRED CHARACTER COLOR :rem 232 
20 PRINT CHR$(147):REM CLEAR SCREEN, SETT p 
ING COLOR RAM TO WHITE :rem 239 by Easter House 
30 POKE 53281,0:КЕМ SET SCREEN TO DESIRED A Communications Cartridge 
BACKGROUND COLOR - BLACK :rem 71 f 
or the C re 64. 
40 FOR C = 1 TO 100:REM PLACE 100 WHITE S тосе 2 
TARS ON THE SCREEN "ren ЛУ Upload/Download, Status Line, etc. Works with 
5, 'our Commodore 1600 ог 1650 Modem. 
50 Р = INT(1000*RND(1))+1024:REM SELECT R АЕ Gite ER used with the new 
ANDOM SCREEN POSITION :rem 69 CBM 1650 Modem. 
68 SUE P,42:REM PLACE ASTERISK AT EO TES Cartridge and Manual - $49.95 
:rem 
78 NEXT C:REM END COUNTER LOOP :rem 56 
80 GOTO 80:КЕМ ENDLESS LOOP SO AS NOT TO 4 
(SPACE)DISTURB SCREEN :rem 22 aster i ЫШ е ы 
90 REM ТО END PROGRAM, PRESS RUN/STOP (919) 924-2889 (919) 748-8446 


pouse 


:rem 2 @ 


MINI JINI Record Keeper" 


ALL IN ONE, ONE FOR ALL! omy 89° 


"MJ is a winner...” "Learn MINI JINI Record Keeper іп 20 minutes" Commander Magazine 
"Super duper database for МІС-20 and COMMODORE 64" Software Intl 
Anyone who keeps records can use MINI JINI" Record Keeper". 


Administrators Collectors Medical persons Schools 
Bill payers Families Organizations Store owners 
же” Bookkeepers Hobbiests Party planners Students 
VISA Bond clippers Card writers Post offices Teams Mast, 
Б” 4 Checkwriters Libraries Salespersons Writers “Сауу 
Plug іп а cartridge for 50 to 500 records оп tape ог disk. 


Print labels and reports, alphabetize, do math and statistics. 


NO EXTRA MEMORY REQUIRED 


Application Templates $14.95 each 
5-15 files with easy to use instructions. 
Organize the Hamshack" Classroom planning" 
Party plan” 


AVAILABLE IN SPANISH 
MINI ЛІМІ” Archivo Instante ~ 
Coming soon: FRENCH, GERMAN and ITALIAN 


COMMODORE 64 and VIC-20 are trademarks of Commodore Business Machines Inc 


JINI MICRO-SYSTEMS, Inc. 


DATABASE MANAGEMENT SYSTEM DESIGN 
BOX 274 KINGSBRIDGE STN., RIVERDALE, NY 10463 (212) 796-6200 
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NEW! 
Universal Input/Output 
Board for VIC-20/64 


16 channel 8-bit A/D converter with 100 
microsecond sampling time. 

1 D/A output. 

16 high voltage/high current discrete out- 
puts. 

1 EROM socket. 

Use multiple boards for additional channels 
up to 6 boards. 


VIC-20 uses MW-311V 
CBM-64 uses MW-311C .... 


$205.00 
$225.00 


MW-302: VIC-20/64 
Parallel Printer Interface. 


Works with all centronics type parallel 
matrix & letter printers and plotters— 
Epson, C.ltoh, Okidata, Nec, Gemini 
10, TP-I Smith Corona, and most 
others. Hardware driven; works off the 
serial port. Quality construction: Steel 
DIN connectors & shielded cables. Has 
these switch selectable options: Device 
4, 5, 6 or 7; ASCII or PET ASCII; 7-bit 
or 8-bit output; upper & lower case or 
upper only. Recommended by PRO- 
FESSIONAL SOFTWARE for WordPro 
3 Plus for the 64, and by City Software 
for PaperClip. 


$119.95 


Dealer 
inquiries invited. 


Micro World Electronix, Inc. 
3333 S. Wadsworth Blvd. #C105, 
Lakewood, CO 80227 

(303) 987-9532 or 987-2671 


Software Discounters 


of 
America 


1-800-225-SOFT 
P.O. Box 278-Wildwood, PA 15091 
In PA (412) 361-5291 
Commodore 64 Software 


Access 
Beach Head (T or D) +. $23 
Neutral Zone (T or D) ...$23 
Broderbund 
Bank St. Writer (D) $43 
Choplifter (CT). .$24 
Loderunner (D .$21 
Operation Whirlwind (D) $25 
Continental 

$33 
Home Accountant (D) .$47 
Tax Advantage (D) $39 
Designware 
Creature Creator (D) <. -$25 
Math Maze (D)... . .$25 
Spellicopter (D) 75525 
Ерух 
Jumpman (T or D) $25 
Pitstop (CT) .$25 
Temple of Apshai (T or D) $25 
HES 
Omnicalc (D). . . $30 
Multiplan (D)..... $65 
Infocom 
Enchanter (DOn о E ec. .$33 
Infidel (D)... T .$33 
Plapetfalli(D)/ s o 5 .$33 
Koala 
Touch Tablet w/Koala Painter $75 
Programmers Guide (D) .$12 
PDI 
Preschool IQ Builder (D)...... $19 
Reading Comprehension (D). ..... 54621519 
Story Builder (D) $19 
Sega 
Buck Rogers (CT) $25 
Congo Bongo (CT) $25 
Sierra On-Line 
BC Quest for Tires (D). . 521 
Frogger (Т ог D) ig toto sot 
Homeword (D) ... $49 
Spinnaker 
Alphabet Zoo (CT). mE. $21 
Bubble Burst (CT).............. 
Jukebox (CT)....... 
Kids on Keys (СТ)... 
Kindercomp (CT). 
Trains (D) 
Synapse 
Blue Max (T or D) 
Morgol (T or D) : 
Pharoah's Curse (T or D)...... 
Shamus Case 11 (T or D)..... 
Timeworks 
Data Manager (T or D). . 
Electronic Checkbook (T or Б)... 
Programming Kit 1, 2 or 3(T or D) 
Accessories 
BASF SS, DD. 
Disk Drive Cleaning Kit...... х 
Dust Cover 64, 1530, 1541, 1525.. 
Wico Boss х7 
Sakata 13" Color м/аџаіо 
Wico Red Ball 
Wico Bat Handle 
Wico Trackball. . 


Ordering & Terms: Orders with cashier check or 
money order shipped immediately. Personal/Co 
checks allow 3 weeks clearance. VISA/MASTERCARD. 
accepted with no additional charge. Shipping: Orders 
under $100 add $2: free shipping on orders over $100. 
PA. residents add & sales tax. Returns: Defective mer 
chandise will be replaced with same merchandise—no 
credits! Returns must have authorization number (412) 
361-5291. Prices subject to change without notice. 


VIC-20/C-64 


MODEM 


MFJ-1237 


53 9: 


Tiny 2%х2%х1 іп. 

300 baud 

Direct Connect 
Originate/Answer ° Full 


Duplex * Carrier detect LED 
World's lowest cost modem. High performance 
Texas Instrument single chip modem design. 
Works for both VIC-20 and Commodore 64. 
Plugs into user's port. Use with single or multi- 
line phones. Plugs into telephone base. 
300 baud. Direct connect. Originate/answer. 
Full duplex. Carrier detect LED. Crystal controlled. 
Powered by computer. Aluminum enclosure. 
Includes Basic listing of Terminal Program. 
Terminal Program available on tape, $4.95 and 
cartridge, $19.95. Specify VIC-20 or C-64. 


Save VIC-20 
Cartridge Programs 
оп аре — 


MFJ-1256 


Adapter board 
lets you save VIC-20 cai 
ridge programs on cassette tape and run them 
using 8K RAM board. Provides cartridge backup, 
eliminates plugging and unplugging cartridges 
and turning VIC-20 on and off. 

Includes adapter board that plugs into expan- 
Sion port and software to save and run cartridge 
programs on cassette tape. Requires 8K RAM 
board (not included). 


RS-232 Interface for 
VIC-20/ C-64 


MFJ-1238 Ф, 
399 . 


Provides RS-232 

voltage conversion for Ü 

VIC-20/C-64 serial port. Use 7” 

RS-232 printers, modems, speech synthesizers 
and other RS-232 peripherals. Switch reverses 
transmit/receive lines for DTE or DCE operation. 
Use as null modem. Standard 25 pin RS-232 con- 
nector.Plugs into user's port. Powered by com- 
puter. 21⁄4x21⁄4 inches. 

VIC-20 Capacitance Meter 


Measure 100 pf to 100 Mfd. 
Includes calibration capacitor, $ 2995 


software оп tape and hardware 
interface. 
Order from МЕЈ and try it. If not delighted, 
return within 30 days for refund (less shipping). 
One year unconditional guarantee. 
Order yours today. Call toll free 800-647-1800. 


Charge VISA, MC. Or mail check, money order. 
Add $4.00 each for shipping and handling. 


CALL TOLL FREE ... 800-647-1800 
Call 601-323-5869 in MS, outside continental USA. 


МЕ ЕМТЕНРНІ5Е5 


INCORPORATED 
921 Louisville Road, Starkville, MS 39759 


Write For FREE Catalog 44 your order in and N E W Call your order in ang Write For FREE Catalog 
кей get a FREE program get a FREE program e 
(602) 855-3357 CBM 64 SOFTWARE CBM 64 (602) 855-3357 


5 Great Adventures For Your CBM 64 .... $29.95 
SAMURAI PAK Add $1.00 Shipping 


ON CASSETTE OR DISK NINJA 


Every Game Is Different! 
HI-RES 


FULL 5-4 АСТІОМ 
ACTION уе SSY GRAPHICS 
UNPREDICTABLE 
YOU WILL | AND HIDDEN 
NEVER DANGERS 
OF THE AW Vii) _ YOU WILL 
HIRES | ; x NEVER HAVE 
ACTIONS! z TO WAIT 


FOR ACTION! 


ALSO INCLUDES TEXT PROGRAMS 


ADVENTURE - SHUTTLE VOYAGE 
CAVES OF SILVER 


REBEL FORCE by Tom Falk $29.95 


; ; DISK VERSION ONLY — CBM 64 ле Shops 

„Неге is the most extensive A HI-RES GRAPHIC ADVENTURE guerrilla tactics that have dim- 
hi-res adventure game ever 1: inished the Kings army. If the 
developed and created for the rebellion and the organization 
Commodore 64. It encom- can be thwarted the rebel force 
passes both sides of the disk will be eliminated. His Majesty 
and includes full color hi-res is presently in hiding. YOUR 
pictures. The story begins in MISSION - You have been hired 
the Kingdom of Acritym. as a mercenary of your land. 
You must locate the rebel 
meeting place. The journey will 
long and hard. Others before 
you have fought valiantly, as 
you shall, only to meet their 
death inside the walls of Acritym. 


For numerous years the 
Kingdom of Acritym has been 
ruled by Lord Cybal. A rebel 
group has formed in an attempt 
to overthrow his majesty's 
Acritym's government. The 
rebellion has left the majority of 
Acritym's people exhausted, 
famished and defenseless. De- 
spite the small size of the group, 
they have a major advantage. 
They are very well organized. 
Because of this they have de- 
veloped a sturdy network of 


Its all part of the most 
complex intricate and huge 
adventure ever created for the 
Commodore 64. GOOD LUCK! 
Keyboard Control. 


D 


YOU ARE THE ONLY ONE LEFT TO HELP - PLEASE SAVE US 


COMPUTERMAT : Box 1664G + Lake Havasu City, Arizona 86403 
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NEWS 
PRODUCTS 


both computers; the Cardboard mañiling list processor for the 64, 
Interfaces, 6 Expansion Interface and the and unciis programs for 
Light Pen, Cardboard 3s Expansion Inter- both computers. 

face, both for the VIC-20; the Cardco, Inc. 
Keypad Cardboard 5 Expansion Interface 313 Mathewson 


for the Commodore 64; the Car- Wichita, KS 67214 

dram 16 16K Memory Expander (316) 267-6525 

Cardco, Inc., of Wichita, Kansas, for the VIC-20; the Cardette 1 

has introduced new products for Cassette Interface for both 

the VIC-20 and Commodore 64. machines; the Cardkey 116-key 64 Music 
Included are Printer Interface, а | Numeric Keypad for both com- А 
Centronics parallel printer inter- puters; and the Cardriter 1 Light Synthesizer 
face with graphics for both the Pen for both the VIC and the 64. 


VIC and 64; the Card А апа Card The company also has avail- 
B Printer Interfaces, universal able the Write Мош! word pro- The Alien Group has developed 
parallel printer interfaces for cessor for the VIC, the Май Now the When I'm 64 music synthe- 


SOPHISTICATED SOFTWARE 
OF AMERICA" 
PRESENTS 


GRAFIX - ARTIST" 
(Commodore 64” version) 


THE LATEST IN EDUCATIONAL 
GRAPHICS SOFTWARE DESIGNED 
WITH THE CONSUMER IN MIND 


CREATE EXTRAORDINARY 
COLOR - GRAPHICS 
USING THE: 
@ Joystick Mode @ Program Mode 


€ Program to Picture Utility (for your basic or 
machine-language programs) 


GRAFIX- ARTIST" provides comprehensive 


@ Reference Card € Help Screens 
€ Introduction Tutorial Ө Demo's 


NO COMPUTER EXPERIENCE 
ISNECESSARY 


Children, parents, artists, educators will enjoy 
the ease-of-use and options 
GRAFIX-ARTIST™ provides. 

NOW AVAILABLE - Grafix-Printer™ 
COMING SOON - Lesson-Designer™ 
Dealer and Distributor Inquiries Invited 


198 Ross Rd. 
King of Prussia, PA 19406 
(215) 265-2277 


COMMODORE 64 


Finally, Excellent Software 
At An Affordable Price! 
Compare: ө MENU DRIVE 
ө USER LOVABLE 
@ ADVANCED FEATURES 

DATA BASE/MAIL LIST 
Fast random access to any record. 
Search on any field. Machine Language 
sorts. Prints mailing labels. Large 
records. Eight fields. 

LOAN ANALYSIS SYSTEM 
Calculate а loan's term, interest 
rate, principal or monthly payment. 
Display an amortization schedule 
on screen or printer. Yearend 
totals for payment to interest and 
payment to principal. Printer ver- 
Sion also gives principal and in- 
terest paid to date for the life of 
the loan. 

HOME INVENTORY 
Record all your valuables. Print in- 
ventory lists on screen or printer. 
Record 700 items per disk Search 
items by Category, Manufacturer or 
Item Description. Indispensable 
in case of theft or fire. 

ALL THREE PROGRAMS FOR 
$26.95 sorry, DISK ONLY 
SEND CHECK OR MONEY ORDER TO: 
MULTI-PAC SOFTWARE 
BOX 7342 
TULSA, OK 74170 
WE PAY TAX AND POSTAGE! 


SmartVoice™ 


NEW 


A breakthrough in voice technology for the 
Vic 20 and Commodore 64 computers. This 
unit is not just another voice synthesizer 
The quality is fantastic and it requires no 
peeks, no pokes, no phonemes. no interface 
cables, no power cords, no text editors or 
programs of any kind. and installs in just 2 
seconds. Say anything you like with simple 
print statements, such as 

PRINT #2, "MY МАМЕ IS SMARTVOICE" 
That is all there is to it. You can talk fast or 
slow, use 63 pitch levels, create sound 
effects, sing songs, use automatic inflection 
and monotone modes, control volume by 
program or external knob. and more. A 
detailed user manual with demonstration 
programs included. Models for other 
computers also available 

COST: $199 Add 4% S&H on MC or VISA orders 

Ohio residents add 5% Sales Tax 


USER FRIENDLY SYSTEMS INC. 
6135 Ross Road Fairfield, Ohio 45014 
(513) 874-4550 


Vic 20 and Commodore 64 trademarks of Commodore Electronic: Ltd 
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The Banner Machine 
For the Commodore 64 (3 extra fonts available). 
For the VIC-20 with 24K memory (2 extra fonts 
available). * Use on any Gemini or Epson MX with 
Graftrax or the FX and RX printers. Also Commo- 
dore 1525E and Banana with the C-64. * Menu- 
driven program operates like a word processor. * 
Ë Makes signs up to 13” tall by any length. е Makes 
p to 34". • 8 sizes of letters 
8' * Proportional spacing; А! 
matic centering; 
Tape or Disk (Specify computer equipment). 


For the Commodore 64: 
Space Raider An amazing arcade simulation. Your 
mission is to destroy the enemy ships. 519.95 
CTRL-64 Permits listing of C-64 programs on non- 
Commodore printers. Lists control symbols in 
readable form. Tape or disk $94.95 

Microbroker Exciting, realistic and educational 
stock market simulation. $34.95 Tape or Disk 
Preschool Educational Programs ABC Fun and 
193 Fun have bright color and action. Each $14.95 
Formulator А scientific Calculator for repetitive 
arithmetic computations. Save formulas. Ideal for 
chemistry, physics, or engineering students. $39.95 
MUPOS Create a file of up to 9 basic programs 
from keyboard/tape/disk and run each program 
selectively. Combine programs. Renumber BASIC 
lines. Note pad, and more. Tape or disk $99.95 
Grade Organizer Teachers—store grades for 6 
classes, up to 40 students each, 680 grades per 
student. Print interim and fime! reports, class 
rosters, and more! Disk $39.95 


+ Cardinal Software" 


Virginia Micro Systems, 13646 Jeff 
Davis Hwy., Woodbridge, УА 22191 
Phone (703) 491-6502 

Ask for our free catalog 


Commodore 64 and VIC-90 are registered 
trademarks of Commodore Electronics Ltd 


NEWS&PRODUCTS 


sizer for the Commodore 64, 
which is available on disk and 
on cassette for $29.95. The pack- 
age includes a machine language 
text-to-speech program, a similar 
program that incorporates the 
“Alien” face whose mouth 
moves in syne with the words, a 
spelling program that uses the 
talking face, and 30 prerecorded 
songs, with menus and written 
instructions to help you write 
and save new songs. 

The Alien Group 

ОУУ 23 St 

Меш York, NY 10010 

(212) 741-1770 


PILOT 
Language For 
Commodore 64 


PILOT II, an advanced PILOT 
language, has been developed 
by Tamarack Software for the 
Commodore 64. 

The program includes file- 
handling capabilities, both high- 
and low-resolution turtle 
graphics, a sprite editor, and 
access to the color and sound 
capabilities of the 64 without 


А Basket Full of Software Values 
at Chick-Size Prices? 


С: commodore 64 


Quality Software Ideal for the Commodore 64™ and VIC 20™ 


WORD PROCESSING — TOTL.TEXT produces 
documents, forms and letters with speed and 


versatility. 
SPELLING CHECKER — TOTL.SPELLER—a 
piled spelling-checker with built-in dic- 
tionary that quickly proofreads and 
suggests correct spelling 

MAILING LIST AND LABEL — TOTL 
LABEL organizes mailing lists, collec- 
tion catalogs, menus, all listing and 
sorting. Merges with TOTL.TEXT. 
DATABASE MANAGEMENT — TOTL. 


| | 


{| INFOMASTER features dynamic record 


SOFTWARE, INC. 
quality you can afford 


Walnut Creek, СА 94596 


and field definitions, multiple options, user de- 
fined report formulas. Integrates with other TOTL 
programs. 


com- BUSINESS ACCOUNTING — TOTL.BUSINESS 
handles A/R, A/P, inventory and sales re- 
ports and other record-keeping tasks. 
TIME MANAGEMENT — TOTL TIME 
MANAGER plans schedules and ana- 
lyzes events in numerous ways. 
KEYWORD CROSS REFERENCE — 
RESEARCH ASSISTANT—a great tool 
for automated indexing and cross ref- 
(415) 943-7877 erence system. 
rademarks of Commodore В 


1555 Third Avenue 


/ 


> 


COMMODORE 64. ғ commodore 


Sx-64 
PORTABLE 


199 


1520 Color Printer/Plotter .. 
M-801 Dot Matrix/Parallel. 


1530 Datasette 

1541 Single Disk Drive 
1600 VIC Modem.. 
1610 VIC Term 40 .. 
1650 AD/AA Modem 
1702 14" Color Monitor. 
1311 Joystick (each) 
1312 Paddles....... 
1110 VIC 8K 

1111 VIC 16K 

1011 RS-232 Interface 
1211 Super Expander 


commocdore 
CBM 64 Reference Guide ...$18.00 
C-64 DISKS 
$65.00 
$19.00 
$19.00 
$39.00 
$19.00 
$19.00 
$39.00 
$39.00 
$39.00 
$19.00 
$39.00 
$39.00 
$19.00 
$19.00 


EasyCalc 
EasyFinance I, 
EasyMail 
EasyScript 
Word/Name Machine 
EasySpell. 
Accounts Receivable 
Accounts Payable 
General Ledger. 
Assembler 
Logo 
Pilot. 
Pet Emulator . 
Screen Editor 
Music Machine. $15.00 
Music Composer. $15.00 
VIC 20 CARTRIDGES & DISKS 
Gortek & the Micro Chips(C)...$19.00 
Super Slot (R) $14.00 
Super Alien (В). $14.00 
Jupiter Lander (R) $14.00 
Radar Rat Race (В). $14.00 
Count Adventure (R) . $21.00 
Pinball Spectacular (R) $19.00 
VIC Reference Guide $15.00 
ARTWORX 

C-64/VIC 20 CASSETTES 
Bridge 3.0.. $15.00 
Teacher's Pet. $12.00 

BRODERBUND 

VIC 20 CASSETTES 

Martian Raid E 
Shark Trap.. 

Multisound Synthesizer. 
COMMERCIAL DATA 
VIC 20 CASSETTES 
Motor Mouse . 

Centipod 
Frogee . 


Road Toad...... m ..$24.00 


-$169.00 
- $219.00 


- $49.00 
..$89.00 
- $249.00 


$42.00 
- $53.00 


SD-1 Disk Drive (C-64)...$349.00 


CARDCO. 
Light Pen 
3 Slot VIC Expans. Int. 
6 Slot Expans. Int. 
Cassette Interface . 
Parallel Printer Interface 
Parallel Interface w/Graphics..$69.00 


SOFTWARE 


CREATIVE SOFTWARE 
C-64 CASSETTES 
Home Inventory .. 
Household Finance 
С-64 CARTRIDGES 
Trashman... ..$29.00 
C-64 DISKS 
Home Inventory... 
Household Finance 1 
МІС 20 САЅЅЕТТЕЅ 
Ноте Inventory .$12.00 
Household Finance .$14.00 
VIC 20 CARTRIDGES 
Astro Blitz .. 
Black Hole.. 
Trashman. 
Choplifter. 


.$11.00 
$23.00 


.$11.00 
$29.00 


$21.00 
$32.00 
$21.00 
$21.00 


DYNATECH 
C-64 DISK 
Codewriter. . 


EPYX 
VIC 20 CASSETTES 
Ricochet 
Sword of Fargoal. 
Rescue at Rigel .. 


$32.00 
$24.00 
..524.00 


GUICK BROWN FOX 
C-64/VIC 20 CARTRIDGE 
Word Processor.. + $49.00 


UM! 
VIC 20 CARTRIDGES 
.$30.00 
-$40.00 
-$30.00 


Meteor Run. 
Alien Blitz .. 
VIC 20 CASSETTES 
Cloud Burst. 
Video Verman 


-$15.00 
-$19.00 


DUST COVERS 
C-64/VIC 20 Cover. 


ATARISOFT 
C-64/VIC 20 Cartridges 
Centipede 
PacMan. 
Donkey Kong. 


Defender . 
Robotron . 
Stargate .. 


VIC 20 CARTRIDGES 
VIC Forth . S 


HES Mon . 
HES Writer. 
Aggressor 
Synthesound . 
Shamus... 
Protector . 
Turtle Graphics. 


С-64 CARTRIDGES - 
HES Mon . s 


HES Writer. 


VIC 20 CASSETTES 
Alien Panic 

Race Fun-Drag Race . 

The Catup 

Exterminator 


Typo (20/64) 
RAINBOW 
C-64 DISKS 
Personal Finance 
Writers Assistant . 
Spreadsheet Assistant. 
QUANTUM 
40/80 Column Video Board... 
40/80 Col. Video Board (16K)... 
SIRIUS 
VIC 20 CARTRIDGES 
Deadly Duck 
‚ Spider City.. 


PRINTERS 
Epson. 
Okidata. 
Star Gemini 10X 
Star Gemini Delta 10 
Smith Corona ТР-2.. 
C.Itoh Prowriter8510P ... 
C.Itoh Gorilla 


MICROSPEC 

VIC 20 CASSETTES 
Spelling Bee- 
Grades 2. 3, 4, 5, or 6 
Math Drill .. 
Portfolio Manager. 
Data Manager . 

VIC 20 DISKS 

General Ledger... 
Mailing List Manager . 
Inventory Package 


C-64 CASSETTES 
Black Вох.. ? 
Color Sketch 
Match Maker 

C-64 DISKS 
Mailing List Manager 
Inventory Package 
General Ledge 


COMPUTER MAIL ORDERS 


.58.00 
.58.00 


.$16.00 
.$16.00 


..569.00 


535.00 
569.00 
569.00 


.$49.00 


.$12.00 


$20.00 


..$16.00 


$45.00 
$79.00 
$79.00 
$79.00 
$69.00 


$139.00 


Black Box. 
Color Sketch 


Match Maker .. 


TRONIX 
VIC 20 CASSETTES 


$16.00 
$22.00 
$20.00 


Galactic Blitz . ..519.95 


Swarm .. 


$22.95 


Sidewinder . ..522.95 


VICTORY 


C-64/VIC 20 CASSETTES 


Adventure Pak I(3 games) .. 

Adventure Pak II(3 games). 

Annihilation .. 

Grave Robber. 

Kongo Kong 
PROFESSIONA 

SOFTWARE 
Word Pro 64.. 


We carry a selection from the above manufacturers plus... 


Synapse, Thorn, InfoCom, Onslow, Practicalc, S 


A А = 


.$12.00 


$12.00 
$16.00 
$11.00 
$16.00 


.$11.00 


pinnaker & Timeworks. 


oWesis 


11500.6%8.5511 


In МУ call (702)588-5654, бері. 0413 
Р.О. Box 6689, Stateline, NV 89449 
Order Status #: 588-5654 M 


-CANADA- EAST= 


1.800 :268 · 4559 f.800-255-895O 


In Toronto call (416)828-0866, Dept. 0413 In PA call (717)327-9575. Dept. 0413 
2505 Dunwin Ct.,Unit 1B, 477 E. Third St. Williamsport, PA 17701 
issauga, Ontario, Canada LSLITI Order Status $t: 327-9576 

Order Status st: 828-0866 Customer Service Number: 327-1450 

No risk, no deposit on C.O.D. orders. Pre-paid orders receive free shipping within the UPS Continental United States with no waiting period for certified 
checks or money orders. Add 396 (minimum $5.00) shipping and handling on all C.O.D. and credit card orders. Larger shipments may require additional 
charges. NV and PA residents add sales tax. All items subjectto availability and price change. We stock manufacturer's and third party software for mostall 
computers on the market. Call today for our new catalog. 


CANADIAN ORDERS: All prices are subject to shipping, tax and currency exchanae fluctuations. Call for exact pricing in Canada. 


VIC - 20 / COM - 64 
HOME / BUSINESS 


МІС 
PRACTICALCPLUS(I6KXT) 43.95 


PRACTICALC 64 (Т) 43.95 
(disk version) 46.95 
TOTL TEXT 2.5 (T) 26.95 29.95 
(disk version) 32.50 
CARDCO 3 SLOT 28.95 
EXPANSION BOARD 


MEMORY 


1 6K EXPANSION 
ONLY 54095 


* 14 Рау Monev Back Guarantee 
* Boosts VIC to 21K RAM 
* Top Quality, Fully Tested 
* 90 Day Warranty 


for IMMEDIATE SHIPMENT 
on Credit Card Orders 


Call: (303) 245-9012 | 
9 AM - 9 PM MST Every Day 
ASSEMBLY TECHNOLOGY 


2692 Hwy 50 Suite 210 
Grand Junction, CO 81503 


Personal checks allow 3 weeks 
Shipping & handling $2.50 
Colorado Residents add Sales Tax 


PEEKs and POKEs. 

There are 25 editing com- 
mands, 19 turtle graphics 
commands, and 23 program 
commands with subcommands 


mers Aid Package contains such 
editing commands as FIND, 


AUTO, SAVE, LOAD, SPRITE, 
and BLOAD (a machine lan- 
guage loader). 

Other special commands 
allow the use of joysticks, light 
pens, and paddles. PILOT II is 
available on diskette for $49.95. 
Tamarack Software, Inc. 

P.O. Box 247 
Darby, MT 59829 
(406) 821-4596 


NEWS&PRODUCTS 


and other options. The Program- 


CHANGE, TRACE, RENUMBER, 


COMPUTE!’s GAZETTE welcomes 
announcements of new products for 
VIC-20 and Commodore 64 computers, 
especially products aimed at beginning 
to intermediate users. Please send press 
releases and photos well in advance to: 
Tony Roberts, Assistant Managing 
Editor, COMPUTE's GAZETTE, 
P.O. Box 5406, Greensboro, NC 27403. 


New product releases are selected from 


submissions for reasons of timeliness, 
available space, and general interest to 
our readers. We regret that we are unable 
to select all new product submissions for 
publication. Readers should be aware 
that we present here some edited version 
of material submitted by vendors and are 
unable to vouch for its accuracy at time of 
publication. @) 


Each connector is 
positively keyed to ` 
| assure correct plug-ins. 


Four slots of high 
quality connectors for 

full memory expansion 
and utility cartridges. 


Gold plated contact 
fingers for solid and 
long-lasting connection. 


mmm 


hook-up provision lets | 


б you run the VIC 


without overheating. 


ШС20 Friendly — 


Two-way power source 
switch for easy selection 
of power from outside 
or the VIC. 


Four convenient 
ON-OFF switches for 
individual control of the 


Reset button lets you 
restart the VIC without 
turning off the 
computer. 


Fuse block for overload 
and short protection. 


The CP VIC-20 Expander is the one you have been waiting for. It incorporates all the features you've 
ever asked for. The CP VIC-20 Expander enhances your VIC-20 computer system by fully expanding 
the VIC-20 memory, plugging in cartridges for programming utilities, language extension, and many, | 
many more various applications for your VIC-20 at only $44.95. 


Dealer inquiries welcome. 


ЕЕ С о т р u t e r р | а с е 23914 Crenshaw Blvd., Тоггапсе, СА 90505 


(213)325-4754 
VIC-20 is a registered trademark of Commodore Business Machines. | 


Uh A Deal 


Lowest Prices — Guaranteed!* 


COMMODORE 64 COMMODORE 64 Cont'd. Rock Bottom BLANK DISKETTES 
Just for You! LANGUAGES & UTILITI P n MAXELL DISKS 
А Hesware 6502 Pro Devel Svs (D) MDI 5500р .. ‚827 
21 њола d Hesware Hesmon 64 (CT) .. rices on MD2 DSDD .. -$40 
'ontinental Home Accountant (D) . Hesware 64 Forth (СТ)... 
tata наш eng Peripherals! 
Continental joan Class Mail Timeworks Programmer Kits I, II, Ш COMMODORE 64 and 
есксазе (D&C 5 h $19 IHESWARE | Just for You! — 
Timeworks Electronic Checkbook (D&C)$19 “Blue SE is ME HESWARE I icd —— A 
Timeworks Money Manager (D&C) .... $19 Blue Sky 80 Column (р). $9 Hescard Vic 5 501... ++ $39 
Timeworks SwifTax (D) ...... $39 Blue Sky Graphic Designer (D) $29  HesModem Vic & C64 -.547 
Creative Household Finance (D) $23 Blue Sky 64 Statistics (D) ... GRAPHICS TABLET 
Creative Household Finance (C) $19 Blue Sky Super Basic (D) . CHALKBOARD POWERPAD $79 
Creative Home Inventory (D) $13 Blue Sky Add On Basic (D) ` UR iom === 
Creative Home Inventory (C) 810 — Blue Sky Super Copy (0)... E ШАГЫР Кз ELECTRONIC ARTS '* 
reative Loan Analyzer (D) .. 
Creative Loan Analyzer (C) BUSINESS SOFTWARE is Meer 5% Ó Home Software for the Commodore 64 
Total Business 3.6 (D) . . gr "The Standard for Sophisticated 
WORD PROCESSING Total Time Мати. (D) Pe s “Eseries mic 
lesware Omniwriter (D) .. Total LableMal(D) атр 5007 
Rainbow Writers Asst. (D) ` $49 Total Research Asst. (D&C). Sos AROA AE ADIATARI CSI Зр БН сус Se 
Blue Sky Script 64 (D) .. $69 Сута! General Ledger (D) . $5 PRINTERS MUL E. ^) EM 
Cardco Write Now! (D) . $39 Сута! Acct. Receivable (D) $45 M RE 
Timeworks Word Writer (D) $39 Cymbal Acct. Payable (D) .. FEE STAR MICRONICS orms? (D). 


Archon (D) . 
Hard Hat Mach (D) . . 
Murder on the Zinderneuf (D) . 


Totl T. Text 2.6 (D&C) 
Той Speller 3.6 (D) . 


Cymbal Inventory Control (D) . 
Cymbal Invoice Writer (D) 


$45 FREE freight & ribbon! 
5ТХ-80 Thermal 60СР5 ... 


Muse Supertext (D) . MSI Practifile (D) GEMINI 10Х Dot I20CPS . $287 Mur 
On-Line HomeWord ( — GEMINI 15X Dot 120CPS ` 8497а еи др 2322 
5 DELTA 10Х Dot 160СР5 8597 The Ci Ae PX 2 
ELECTRONIC Ерух Dragon Riders of Pern (D&C) DELTA 15Х Dot 160CPS $747 ut & Paste 
SPREADSHEETS Epyx Silicon Warrier (CT) .. TONER T DANT CES. $49; D'Bug (D) . 
Sega Congo Bongo (CT) . RADIX 10 Dot 200/50СР5 584701155 Peces De 535. 
Hesware Multiplan (D) .. И Sublog Pinball (D&C) ... RADIX ID DotA: $99, Music Construction Set (0). $40 


Hesware Omnicalc (D) Financial Cookbook (D) .... 


BMC PRINTERS Dr. J. & Larry Bird One on One (D) 72540 


Hesware Maze Master (CT) . 


MSI Practicalc (D&C) . Broderbund Choplifter (CT) 
MSI Programmable Spreadsheet (D) . Epyx Pitstop (CT) . BMC BX80 . 


B. SKY CALC Result Easy (D) .. $49 
Home Calc (D&C) 
B. Sky CALC Result Adved (D) 


BMC DAISY 5 
BMC DAISY 401. 


MODEMS FREE DISKETTE 


SubLogic Flight Simulator . 
Sega Star Trek (CT) ... 
Sega Buck Rogers (CT) 


HOME APPLICATION: Rec aem Intel (BO) with each purchase of electronic! 
Spinnaker Aerobics (D) $33 INOVATION 
Creative Car Costs (D) $3 COMMODORE VIC 20 Sa Gn arts software 


Creative Car Costs (C) 
Creative Decision Maker (D) 
Creative Decision Maker (С). 


MEE PERSONAL PRODUCTIVITY 212 Auto Cat 


Creative Home Office (D) .. ..$22 Cat... 


Creative Home Office (C). .. $19 D-Cat 
Hesware Time & Money Manager © 339 ea SME eT Po ede 


Timeworks Data Manager (D&C) . Creative Household Finance (C) . ОЕ ANCHOR MODEMS 
$13 (with power & cable) —Suth A DeaL 


Compuserve Starter Kit (5 hrs) ........ Creative Home Inventory (D). . 
Timeworks Data Manager II (D&C) ....$19 ^ Creative Home Inventory (C) . 


$10 Mark 7 300 baud 
ART & MUSIC мет Were ps m : = Mark 12 300-1200 baud . ...... 
RANE SSi Ee IS EOD). 2 Volksmodem 300 baud ............... 
Sus Mi Rae D 4 CALL TOLL FREE 
MSIL Practicalc (T) . $29 T 
bap C Hesware Vic Fourth (C $39 Amdek Color 1... z: 1-800-431-8697 
Spinnaker Delta Drawing (CT) н енем $26 ВМС13' Composite Color 602-968-9128 
ardco Write Now..... Я BMC 12" Low Res Green . . 85 
Delta Music (СТ)... +1526 — Hesware 6502 Pro Dev був. 1$19 BMC 12" Low Res Amber oes Orders Only! 


EDUCATION Еру Eun ү At UST Ses BMC 12" Hi Res Green..... 
Spinnaker Alphabet Zoo (CT) . S he eon wa Ose š BMC 12" Hi Res Amber 

Spinnaker Cosmic Life (CT) Broderbund Mastertype (СТ) -$24 USI 12” Green НІНІ Res 
Spinnaker Facemaker (CT) . EDUCATIONAL ЅОЕТИ АКЕ —— 05512 Amber HiHi Res 
Spinnaker Fraction Fever (CT) Т ЛЫП USI 147 Composite Color 
Spinnaker Kids on Keys (CT) . $23 еамше pip ха Monitor cable w;above .... 


5129 12629 N. Tatum Blvd., 8138 
изә Phoenix, AZ 85032 


Spinnaker Kindercomp (CT) SM e ee FE COMMODORE DISK DRIVES] 

Spinnaker Story Machine (CT) беду Machine CTI Sec Ces uk Base ges i 2 

Sena ЧОУ МЕД Soe Face Maker (CT) .. $23 Concord Disk Drive For Information, Customer 
pinnaker Up For Grabs 926 Kids On Keys (CT) 523 Commodore 1541... 


Spinnaker Delta Drawing (CT) 
Creative I Am Your 64 1 (D) . 

Cretive I Am Your 64 II (D) . 

Hesware Turtle Graphics Il (CT) 
Hesware Туре 'N' Writer (CT) . 
Cymbal HghSI Mathematics (D) . 
Cymbal HahSl Span-Eng (D) 
Cymbal HghSl Science (0)... 


$23 ee Service, Release Dates, etc. 
ME WICO JOYSTICKS Call 


$19 
602-955-3857 


Alphabet Zoo (CT) .. 

Hesware Turtle Graphics (CT) 
Creative Pipes (C) ....... 

Фе Creative Spills & Fills (C) . $19 ARR Sie uuu 
Creative Hangman & Hangmath (C) $10 


$39 
$39 ONS ICARDCO 


Creative Choplifter (СЛ)... етә A Cos 


Cymbal HghSl History & Š Epyx Temple of Apshai(C]. ` 14 Graphic Printer Interíace . 
Geography (D) both ... с Sega Congo Bongo (СТ). у ш 559 
Cymbal HghSl Music (D) . Sega Star Trek (CT) ae modore E 


JóK;Board ы 2.00.2 
Cassette Interface ....... 


Cymbal Pre Schooler (О)... (С) = Tape (D) = Disk (СТ) = Cartridge 


*TERMS OF OFFER: If you find a price for any software or peripheral in this issue that is lower than our advertised price, we'll guarantee to beat it! Valid only on product in 
similar in-stock conditions. Valid only on prices appearing in print in this issue. 

ORDERING & TERMS: Send cashier check, money order; personal/company checks allow 3 weeks bank clearance. VISA/MasterCard accepted, Provide phone number 
with order. SHIPPING: Software add $4.00 for first piece, add $1.00 each additional piece. Hardware add 3% or $10.00 whichever is greater. Returns must have authoriza- 
tion number (call 602-955-3857 for authorization number). All returned merchandise subject to restocking fee and must come with all original packaging. No returns 
allowed after 30 days from shipping date. Prices are for cash; VISA and MasterCard add 3%. Prices subject to change without notice. All products subject to availability from 
manufacturers and/or suppliers. All prices in U.S. dollars. We sell mail order only. C.O.D. orders accepted. 


зз ы 4 
Bug-Swatter: 


Modifications And Corrections 


e “Budget Planner” 
Commodore Datassette to store data. The fol- 
lowing modifications will allow you to use the 
program with a disk drive: 


450 OPEN 1,8,0,Е5 :rem 82 
4050 OPEN 1,8,1,"@@:"+F$ :rem 156 
7120 OPEN 1,8,0,Е5 :rem 131 


e The Commodore 64 version of "Tetracrys- 
tals” ( (contains a slight error on line 13. 
To correct it, insert RN between G and BLU. C7$ 
should be 


“BLKWHTREDCYNPURGRNBLUYEL” 


e The printer used to generate program 
listings has burped another pesky question mark. 
Line 120 of the VIC version of MLX (January and 
February) is the latest victim. Correct it by re- 
moving the ? between RIGHT and OFF. 


€ Readers who typed in the 64 version of 
"Canyon Cruiser" may have encountered 
an ?ILLEGAL QUANTITY ERROR in line 1420 
because it is not possible to POKE a number higher 
than 255 into a memory location. Change line 
1420 to 


POKE53287, (PEEK(53287) +1)AND255 


ө "SpeedScript" (January) works as listed, 
but there are some inconsistencies in the accom- 


panying article. The cursor keys were incorrectly 
labeled on Figure 1: Keyboard Map, page 48. CRSR 
Left and CRSR Right will move the cursor left and 
right. CRSR Up moves to the previous sentence; 
CRSR Down moves to the next sentence. Table 1, 
page 52, is missing CTRL-= which returns the 
amount of free memory. Table 2 is missing the 
command for line spacing. SpeedScript defaults 
to double-spacing; if you want single-spaced docu- 
ments, use CTRL-(English Pound)-S, followed by 
the number one (1). 

Some readers, in trying to enter SpeedScript, 
discovered an ?UNDEF'D STATEMENT error in 
line 550 of MLX. If you don't use the POKEs listed 
on page 39, MLX and SpeedScript will both try to 
use the same area of memory. The POKEs fence 
off a section of BASIC for use by SpeedScript. It is 
necessary to follow the directions on page 39 be- 
fore you LOAD MLX. 

Also, next month look for “SpeedScript Re- 
visited" in which Charles Brannon will answer a 
variety of questions from readers. @ 
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brochure and catalog. 


Free Program 


SUNSOFT’s™ 1541 Disk Backup program copies almost any 
disk. It's FREE when you buy any disk program from our free 
catalog, now featuring Disk Doctor узо, а collection of pro- 
grammers' aids to help you do such things as auto-run, un- 
scratch, auto-number, re number, append, merge and screen 
dump. Also enables you to convert blocks of memory into DATA 
statements, and helps you with binary and hex math/conver- 
sions. MUCH, MUCH MORE! Disk Doctor v3.0: for 64 only, disk 
only—$2495. Send а postcard or letter for free descriptive 


Box 99 
Alturas, FL 
33820 


FREE 
BROCHURES 


TERMINAL SOFTWARE 
VERSATERM II^ 


UPLOAD, DOWNLOAD, TRANSFER 
FILES TO/FROM DISK, DUMP TO 
PRINTER, CONVERT IMAGE FILES 
AND BASIC LISTINGS INTO RUN- 
ABLE PROGRAMS, AUTODIAL AND 
AUTOLOGON, PROGRAMMABLE 
KEYS, 46K BUFFER, SELECTABLE 


COLORS. $34 Q5 ON DISK 
VERSATERM I" 


TERMINAL SOFTWARE FOR THE 
2495 © 3995 


ТАРЕ CARTRIDGE 


805 
922-4095 


— чм _ N y," G(L Res ааа 
Su) а soft 5% sales tax 


C-64 AND МЕ 20 


THE BEST BUY 
IN EPROM 
PROGRAMMING! 


EPROM PROGRAMMER 
FULLY BUFFERED, BUILT IN POWER 
SUPPLIES, READS, PROGRAMS, VERI- 
FIES, CHECKS ERASURE, TRANSFERS. 
FOR ALL POPULAR EPROM TYPES 
SPANNING 1K TO 16K BYTES. 911450, 
EASY-MOUNT EPROM 


C64 HOLDS(1)4 OR BK BOARDS FOR VIC 
VIC HOLDS(2)4OR(1)8K AND Có4 


1899 with case — 1699 o case 


ELECTROSHARP TECHNOLOGIES 


1981 SANDALWOOD DR. SANTA MARIA, CA 93455 


736 9988 


МІС & 64 


ВЕ A COPY C.A.D. (CASSETTE AIDED DUPLICATOR) NOW 
YOU CAN MAKE BACKUP COPIES OF ALL THE COSTLY, 
NON-SAVEABLE CASSETTE PROGRAMS YOU BOUGHT. 


OUR BACKUP V1.0 UTILITY PROGRAM WILL LET YOU 
MAKE DUPLICATES THAT RUN. 
BACKUP V1.0 WILL WORK WITH A STANDARD 5K 


UNEXPANDED VIC. MEMORY EXPANSION IS REQUIRED 
TO COPY PROGRAMS LONGER THAN 3K BYTES. 


$24.95 
PLus$200 SOFTWARE PLUS 
SHIPPING & GREENBACK LANE 
HANDLING CITRUS HEIGHTS, CA 95610 


VISA, MASTERCARD, AND MONEY ORDERS 
CA RESIDENTS ADD 6% SALES TAX. 
VIC IS A TRADEMARK OF COMMODORE 


POWER PLUS 


FEATURES: 


after reset 
* Screen Dump—to printer 


* Machine Language Monitor with 
* Assembler/Disassembler 
• Transfer, Fill, Hunt, etc. 
* Adds BASIC commands 
е Find * Change 
* Renumber - e Delete 
* Auto line numbers 
* Excellent manual 


$19.99 


C-64 SOFTWARE 


A utility program that adds over 40 
commands to your C-64. Doesn't use any 
BASIC memory. 100% machine language. 


* Un-new—get back BASIC programs 


* Easy, abbreviated Disk Commands 


(include $2.00 p/h) to: Educom| 


(619) 942-3838 
SATISFACTION GUARANTEED 


Indicate tape or disk. Send check or m.o. 


p 
2139 Newcastle Ave. e Cardiff, CA 92007 


AT LOW PRICES 
QUICKWRITER II 


A full-featured word processor at a 
fraction of the cost. More powerful than 
all w/p under $50.00. Has features even 
$100.00 w/p don't have. 
FEATURES 

* 10096 machine code, the fastest w/p 
we've seen 
Works with all printers/interfaces 
Semi-automatic hyphenation 
Justification 
Form letters automatically 
Block Transfer, Delete, Insert, 
Append, 
* Auto page numbers, headers and 

footers 
Send disk commands: 
PRE-VIEW—see left or right side of 
page before printing 
Full-screen editing with rapid scroll 
Easily send special printer commands 
Excellent manual 


$29.99 


Make Your Commodore Radio Active 


° 


lie 
2 
c 


The MICROLOG AIR-1 cartridge will turn your VIC-20 or 
C-64 into a complete Radio Teletype and Morse code ter- 
minal. Connect a shortwave radio and you'll be watching 
text readout from weather stations, news services, ships and 
HAM radio operators all over the world. A whole new use for 
your home computer. The AIR-1 contains both program in 
ROM and radio interface circuit to copy Morse code and all 
speeds and shifts of radio teletype. Plus the on screen tuning 
indicators mean you never have to take your eyes off the 
video for perfect tuning. 


With keyword or manual printer control for permanent 
paper copy, you won't miss a single bit of the action. 

If you've been looking for something to spice-up your 
computing, try the ultimate "peripheral" and connect your 
computer to the AIR-1. 

The complete AIR-1 for the VIC-20 or “64” is $199. 
(With 4 mode AMTOR, $279.) See it at your local dealer or 
call Microlog Corporation, 18713 Mooney Drive, Gaithers- 
burg, Maryland 20879. 

TEL: (301) 258-8400. Telex: 908153. 


For Ham radio use, the Air-1 will also send and receive 


RTTY/CW with AFSK/PTT & + CW keying outputs. 
The AIR-1 will even tell you what Morse speed you're 
copying and provide built-in send/receive code 


practice! 


COLOR PROBLEMS? 
One of Our Four New 
Products will Solve Them! 


You're not alone. Thousands of Com- 
modore 64 owners have “fuzzy” color on 
their TV. Most have interference lines 
crowding out their great graphics. Many 
have bought expensive monitors or new 
TVs, and often even that hasn't helped. 
But, most of us just lived with the problem. 
Now the engineers at Bytes & Pieces 
have four simple, inexpensive solutions. 


If you have an “old 64” (with the 5 pin 
Monitor Din Plug), you've probably had 
color, resolution and interference 
problems, We can solve them! 
The Interference Stopper...A new 
= kit that installs in minutes with two 


the RF interference on your screen. 


$15.95 


The Color Sharpener... Use if your 
“old 64” is hooked up to a TV. Just 

plug into the monitor plug, and the 
color and contrast immediately im- 


simple solder connections. Best 
results when combined with *2, 3, 
or 4 below. Absolutely stops 90% of 


4. 


5. 


MICROLOG 


INNOVATORS IN DIGITAL COMMUNICATION 


The Monitor “Improver”. . . you ORDER TODAY! 
һауе а Commodorel/Olmoniorn Í Беске send me the following: | 
this cable (3 prong) gives you a pic- | SY Пеш Amount 
ure you won't believe. Better than | —— Interference 
he cable Commodore built. . .by l Stopper 9$1595 5 
a lot. Try it, you won't be disap- Color Sharpener 
pointed. (Also hooks your "Old 64" І @518.95 5 
to the 1702) 624.95 | NEW Color 
The Reset Switch. . .Here it is, а CH ene 
Reset Switch for Vic or Cornmodore. I 
Get back into control of a “Hung-Up” | —— The Monitor 
program. Resets all pointers. Easy І $2495 @ s 
two solder connection installation. l i 
Every computer should have one. Í —— The Reset Switch 
l 05995 DRAN 
$9.95 Computer Dust 
l 
If any of our products do not work to l Cover @ $995 $ 
your satisfaction, send it back апа 1541 Disk Dust 
we'll refund your purchase price in full. | Cover @ 58.95 5 
DUST PROBLEMS? l Dataset Dust 


Solve Them with Matching Dust 
Covers for Computer, Tape and Disk. 
57.95--59.95 
These ате the deluxe covers for either the 
Commodore 64 or the Vic 2O made of 

brown leather grain Naugahyde, spe- 
cially lined with a soft non-scratch liner, 


Cover @ $7.95 s 
| Shipping & Handling s 24 


5% State Tax 
l (Wisconsin Residents only) $ А 


8 


TOTAL $ T 


O Check or Money Order enclosed 
1 О Charge to my VISA or MasterCard 


prove. Dramatically. Crisp letters. for a cover you just can't beat. l VISA # 
Great graphics. $18. 95 Don't waste your money on those cheap I MasterCard # 
d looking, cleat plastic, static filled covers. Inner Bank # 
3 The NEW Color Sharpener | Get the quality ones, custom fitted to your | Expiration Date 
в pnr. ө if your je ie is 5 Commodore computers. l 
ролт. ene caine Shap Available singly or as a matched set in 1 Signoture 
ener built in. АШ the benefits of #2, , Beautiful brown simulated leather. | su то, 
7 lo ic 2O are registere 
on your rnonitor. $24.95 trademarks of Commodore С Company. l Ades 
1 Dealer 550 М. 68th Street, City 
Byles & Pieces, Inc. nou 5 Wauwatosa, WI 53213 414/257-3562 | State/Zip 
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VIDEO INSTRUCTION TAPES! 
STEP BY STEP INSTRUCTIONS 


PICTURES ARE WORTH 
THOUSANDS OF WORDS AND SAVE 
HOURS OF FRUSTRATION 


USE YOUR VCR SIDE BY SIDE WITH YOUR COM- 
PUTER TO LEARN HOW TO PROGRAM, AND HOW 
TO USE PROGRAMS. YOUR VCR ALONG WITH 
YOUR COMPUTER SERVE AS YOUR PERSONAL 
TUTOR. PAUSE YOUR VCR TO REVIEW AND 
LEARN AT YOUR OWN PACE. 


TAPES NOW AVAILABLE 


CAT# TOPIC APPROX RUN TIME 

BP-3 LEARNING C-64 BASIC 2 HR $49.95 
BP-4 LEARNING VIC-20 BASIC 2 HR $49.95 
010-1 COMMODORE 64 DISK 1/0 1 HR 45 MIN $49.95 
DIO-2 VIC 20 DISK 1/0 1 HR 45 MIN $49.95 
EW-3 CALC-RESULT ADVANCED 1 HR 30 MIN $39.95 
EW-4 CALC RESULT EAZY 1 HR 15 MIN $29.95 
EW-5 РВАСТІСА(С C-64 ТНА 15 MIN 529.95 
EW-6 PRACTICALC VIC-20 1 HR 15 MIN $29.95 
WP-5  SCRIPT-64 1 HR 30 MIN $39.95 
UT-2 THE LAST ONE 1 HR 30 MIN $39.95 


Electronic worksheets: EW-3-6. Detailed step by step in- 
sturction in the use of electronic spread/sheet software. 
Work along and set up a complete example worksheet. 


Basic programming: BP-3 & 4. Teaches BASIC Language 
commands and programming techniques. Builds yourknow- 
ledge from beginning in advanced levels. 


Data File Programming: DIO-1 & 2 teaches BASIC Language 
data file programming using random, sequential, and relative 
access data files. 


VHS or BETA FORMAT 


Add $3.00 per order for shipping and handling. 
Add $3.00 for C.O.D. 


[csl 
To Order VISA 
Phone or Write SERERE 


LYNN COMPUTER SERVICE 


6831 West 157th Street Tinley Park, Illinois 60477 


(312) 429-1915 


VIC-20 AND COMMODORE 64 ARE TRADEMARKS OF COMMODORE 
BUSINESS MACHINES, INC. CALC-RESULT IS A TRADEMARK OF HANDIC 
SOFTWARE. PRACTICALC IS A TRADEMARK OF COMPUTER SOFTWARE 
ASSOCIATES. 
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BASIC BYTE JUST 
MADE MANAGING YOUR 
STOCK PORTFOLIO EASIER 


Introducing PORTFOLIO MANAGER by Basic Byte, a high- 
quality, easy-to-use software program for use on your 
Commodore 64 or VIC 20 (16K RAM) personal computer. 

It's designed to eliminate hours of time consuming 
paperwork. And make it easy for you to handle your 
investments. 

PORTFOLIO MANAGER lets you instantly update your 
stock’s current value. Calculate gains and losses. Record 
dividends. Print reports. Even determine the price per 
share after your broker's commission. All you have to do 
is follow the easy, step-by-step instructions. 

The price? Only $29.95. And that makes PORTFOLIO 
MANAGER a great investment by itself. 

You'll find PORTFOLIO MANAGER on tape or disk drive 
at your local dealer. Or call direct (313) 540-0655 or write 
РО. Box 924, Southfield, MI 48037 and order yours today. 


== 
BASIC BYTE, INC. 


SUPER FORTH 64* 
TOTAL CONTROL OVER YOUR COMMODORE-64" 


with almost 
ENGLISH LANGUAGE PROGRAMMING EASE! 
ө Home Use, Fast Games, Graphics, Data Acquisition, Business 
ө Process Control, Communications, Robotics, Scientific 
A Superset of MVPFORTH + Ext. for the beginner or professional 
© 20 x faster than Basic. © Access all C-64 peripherals including 4040 drive. 
© 1/3 x the programming time. ° Single disk drive copy utility, 
t Easy Ш control of all sound, hi res, | Disk & Cassette based, Disk Included. 
graphics, color, sprite, plotting line & circle. Full disk usage— 683 Sectors. 
using Forth Words. A 
ОЕ 5 Supports both commodore sequential files 
Poa screen ton B Tes, ° Forth words for accessing the 12K High RAM. 
© "APPLICATION" for application program ө Vectored kernal wards. 
distribution without licensing. ps 
© FORTH equivalent Kernal Routines. ee DECOMPILER facility. 
* Conditional Macro Assembler. ш кы 
‘© More Compact than assembly code. 9 ASCII error messages. А 
© Meets all fig. 79 standards +. © FLOATING POINT. SIN/COS & SQRT routines. 
* Source screens provided. © Conversational user defined Commands. 
e Compatible with the book ° Tutorial examples provided, in extensive manual. 
“Starting Forth” by Leo Brodie, © INTERRUPT routines provide easy control of 
* Direct control over all 1/0 ports 15232. IEEE, — split screen display. hardware timers, alarms and devices. 
including memory & interrupts, e A SUPERIOR PRODUCT in every way! See yur local dealer 


or Phone order TODAY! 
at a low price of ONLY $89 Immediate delivery 


EDUCATIONAL SOFTWARE ALSO AVAILABLE 


“The _ КНЕШИНЕЗТ УЫ “Sold 
пот EXPANS-I-O-N swe 
15-Day CHASSIS s 

Money, Back for the Lifetime 
3 па VIC-20* Warranty 
е © ц Plug in up to 40K RAM and all other PACKS 
“VIXPANDER-6" | (шін egg at are available. (Can be daisy chained.) 
6-slots - Fully buffered % Memory Protect included 9 ROM Copier 


Electronics. * Fully Buffered (prevent memory dropouts} 


ө Fuse Protection | e Large switches 

© Rigid support • Also other prod. avail. 
IN STOCK immediate delivery. 

Phone in Order and we pay the shipping. ——ORDER TODAY — 


Plug in up to 6 GAMES or 


MEMORY PACKS then Switch 
Select each separately or 


С combination 


RESET 


COO. [нс & VISA accepted) СА паа 
Call: (415) 651-3160 
РАКЅЕС RESEARCH 
Drawer 1766-Е 
Fremont, СА 94538 


* Dealer inquiries invited « 


А Beginner's Guide 
To Typing In Programs 


What Is À Program? 


A computer cannot perform any task by itself. 
Like a car without gas, a computer has potential, 
but without a program, it isn't going anywhere. 
Most of the programs published in COMPUTE's 
GAZETTE for Commodore are written in a computer 
language called BASIC. BASIC is easy to learn 
and is built into all VIC-20s and Commodore 64s. 


BASIC Programs 


Each month, COMPUTE's GAZETTE for Commodore 
publishes programs for both the VIC and 64. To 
start out, type in only programs written for your 
machine, e.g., "VIC Version" if you have a VIC-20. 
Later, when you gain experience with your com- 
puter's BASIC, you can try typing in and converting 
certain programs from'another computer to yours. 
Computers can be picky. Unlike the English 
language, which is full of ambiguities, BASIC usu- 
ally has only one "right way" of stating something. 
Every letter, character, or number is significant. A 
common mistake is substituting a letter such as 
O for the numeral 0, a lowercase І for the numeral 
1, oran uppercase B for the numeral 8. Also, you 
must enter all punctuation such as colons and 
commas just as they appear in the magazine. 
Spacing can be important. To be safe, type in the 
listings exactly as they appear. 


Braces And Special Characters 
The exception to this typing rule is when you see 
the braces, such as “{DOWNY’. Anything within 
a set of braces is a special character or characters 
that cannot easily be listed on a printer. When 
you come across such a special statement, refer 
to "How To Type In COMPUTE!'s GAZETTE 
Programs." 


About DATA Statements 


Some programs contain a section or sections of 
DATA statements. These lines provide information 
needed by the program. Some DATA statements 
contain actual programs (called machine language); 
others contain graphics codes. These lines are espe- 
cially sensitive to errors. 

If a single number in any one DATA statement 
is mistyped, your machine could “lock up," or 
“crash.” The keyboard and STOP key may seem 
“dead,” and the screen may go blank. Don’t panic 
—no damage is done. To regain control, you have 


to turn off your computer, then turn it back on. 
This will erase whatever program was in memory, 
so always SAVE a copy of your program before you RUN 
it. If your computer crashes, you can LOAD the 
program and look for your mistake. 

Sometimes a mistyped DATA statement will 
cause an error message when the program is RUN. 
The error message may refer to the program line 
that READs the data. The error is still in the DATA 
statements, though. 


Get To Know Your Machine 


You should familiarize yourself with your com- 
puter before attempting to type in a program. 
Learn the statements you use to store and retrieve 
programs from tape or disk. You'll want to save a 
copy of your program, so that you won't have to 
type it in every time you want to use it. Learn to 
use your machine's editing functions. How do 
you change a line if you made a mistake? You can 
always retype the line, but you at least need to 
know how to backspace. Do you know how to 
enter inverse video, lowercase, and control char- 
acters? It's all explained in your computer's 
manuals. 


A Quick Review 

1. Type in the program a line at a time, in order. 
Press RETURN at the end of each line. Use back- 
space or the back arrow to correct mistakes. 

2. Check the line you've typed against the line in 
the magazine. You can check the entire program 
again if you get an error when you RUN the 
program. 

3. Make sure you've entered statements in braces 
as the appropriate control key (see "How To Type 
COMPUTE!’s GAZETTE Programs" elsewhere in 
the magazine). 


We regret that we are not able to respond to individual 
inquiries about programs, products, or seroices appear- 
ing іп COMPUTE''s GAZETTE for Commodore due to 
increasing publication activity. On those infrequent 
occasions when a published program contains a typo, 
the correction will appear in the magazine, usually 
within eight weeks. If you have specific questions about 
items or programs which you've seen in COMPUTE''s 
GAZETTE for Commodore, please send them to Gazette 
Feedback, P.O. Box 5406, Greensboro, NC 27403. 
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How To Type In 
COMPUTE!'s GAZETTE Programs 


Many of the programs which are listed in COM- 
РОТЕ!5 GAZETTE contain special control characters 
(cursor control, color keys, inverse video, etc.). 
To make it easy to know exactly what to type when 
entering one of these programs into your com- 
puter, we have established the following listing 
conventions. 

Generally, any VIC-20 or Commodore 64 
program listings will contain words within braces 
which spell out any special characters: [DOWN] 
would mean to press the cursor down key. (5 
SPACES) would mean to press the space bar five 
times. 

To indicate that a key should be shifted (hold 
down the SHIFT key while pressing the other 
key), the key would be underlined in our listings. 
For example, S would mean to type the S key 
while holding the shift key. This'would appear 
on your screen as a "heart" symbol. If you find 
an underlined key enclosed in braces (e.g., (10 
N }), you should type the key as many times as 
indicated (in our example, you would enter ten 
shifted N's). 

If a key is enclosed in special brackets, £4, 
you should hold down the Commodore key while 
pressing the key inside the special brackets. (The 
Commodore key is the key in the lower left corner 
of the keyboard.) Again, if the key is preceded by 
a number, you should press the key as many times 
as necessary. 

Rarely, you'll see a solitary letter of the al- 
phabet enclosed in braces. These characters can 
be entered on the Commodore 64 by holding down 


the CTRL key while typing the letter in the braces. 
For example, {A} would indicate that you should 
press CTRL-A. You should never have to enter 
such a character on the VIC-20, but if you do, you 
would have to leave the quote mode (press RE- 
TURN and cursor back up to the position where 
the control character should go), press CTRL-9 
(RVS ON), the letter in braces, and then CTRL-0 
(RVS OFF). 

About the quote mode: You know that you can 
move the cursor around the screen with the CRSR 
keys. Sometimes a programmer will want to move 
the cursor under program control. That's why 
you see all the {LEFT}’s, {НОМЕ}, and 
{BLU}’s in our programs. The only way the com- 
puter can tell the difference between direct and 
programmed cursor control is the quote mode. 

Once you press the quote (the double quote, 
SHIFT-2), you are in the quote mode. If you type 
something and then try to change it by moving 
the cursor left, you'll only get a bunch of reverse- 
video lines. These are the symbols for cursor left. 
The only editing key that isn't programmable is 
the DEL key; you can still use DEL to back up and 
edit the line. Once you type another quote, you 
are out of quote mode. 

You also go into quote mode when you IN- 
SerT spaces into a line. In any case, the easiest 
way to get out of quote mode is to just press RE- 
TURN. You'll then be out of quote mode and you 
can cursor up to the mistyped line and fix it. 

Use the following table when entering cursor 
and color control keys: 


When You Read: Press: See: When You Read: Press: See: When You Read: Press: See: 
{CLR} [ surr | (сікіноме | {cyn} CTRL [+] k E73 е Е 
(HOME) [ сном | (PUR) єтє [5] B £83 € кн 
{uP} SHIFT (GRN) [em |1» | ігі) Ес 
DOWN) [] % {BLU} CTRL [ | {Е2} SHIFT п A 
{LEFT} SHIFT Eee | {YEL} [s=] ] [F3] [iha sss] EB 
[RIGHT) [S | {ка} sur) [| s ] m 
RVS) ств: || 9 £23 (c m (r5) [^s | 18 
OFF} Гак) ° m o е [5] Ей ce pm] в | ЖМ 
BLK] em ][ 1 | Е E43 С ER E] [F7) Bi 
(инт) Гак] [2] £53 с |5 Ea ce ” Г 
RED) шы £63 e [s] | 
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The Automatic Proofreader 


“The Automatic Proofreader” will help you type in program 
listings from COMPUTE/'s Gazette without typing mistakes. It 
is a short error-checking program that hides itself in memory. 
Wher activated, it lets you know immediately after typing а 
line from a program listing if you have made a mistake. 
Please read these instructions carefully before typing any 
programs іп COMPUTE/'s Gazette. 


Preparing The Proofreader 

1. Using the listing below, type in the Proofreader. The 
same program works on both the VIC-20 and Commodore 
64. Be very careful when entering the DATA statements — 
don't type an l instead of a 1, an O instead of a 0, extra 
commas, etc. 

2. SAVE the Proofreader on tape or disk at least twice 
before running it for the first time. This is very important because 
the Proofreader erases this part of itself when you first type 
RUN. 

3. After the Proofreader is SAVEd, type RUN. It will 
check itself for typing errors in the DATA statements and 
warn you if there's a mistake. Correct any errors and SAVE 
the corrected version. Keep a copy in a safe place — you'll 
need it again and again, every time you enter a program 
from COMPUTEN's Gazette. 

4. When a correct version of the Proofreader is RUN, it 
activates itself. You are now ready to enter a program listing. 
If you press RUN/STOP-RESTORE, the Proofreader is dis- 
abled. To reactivate it, just type the command SYS 886 and 
press RETURN. 


Using The Proofreader 

All VIC and 64 listings in COMPUTE/'s Gazette now have a 
checksum number appended to the end of each line, for example 
“теп 123”. Don't enter this statement when typing in a program. 
It is just for your information. The rem makes the number 
harmless if someone does type it in. It will, however, use up 
memory if you enter it, and it will confuse the Proofreader, 
even if you entered the rest of the line correctly. 

When you type in a line from a program listing and 
press RETURN, the Proofreader displays a number at the 
top of your screen. This checksum number must match the 
checksum number in the printed listing. If it doesn't, it means 
you typed the line differently than the way it is listed. Im- 
mediately recheck your typing. Remember, don't type the 
rem statement with the checksum number; it is published 
only so you can check it against the number which appears 
on your screen. 

The Proofreader is not picky with spaces. It will not 
notice extra spaces or missing ones. This is for your conven- 
ience, since spacing is generally not important. But occasion- 
ally proper spacing is important, so be extra careful with 
spaces, since the Proofreader will catch practically everything 
else that can go wrong. 

There's another thing to watch out for: if you enter the 
line by using abbreviations for commands, the checksum 
will not match up. But there is a way to make the Proofreader 
check it. After entering the line, LIST it. This eliminates the 
abbreviations. Then move the cursor up to the line and press 
RETURN. It should now match the checksum. You can check 
whole groups of lines this way. 


Special Tape SAVE Instructions 


When you're done typing a listing, you must disable the 
Proofreader before SAVEing the program on tape. Disable 
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the Proofreader by pressing RUN/STOP-RESTORE (hold 
down the RUN/STOP key and sharply hit the RESTORE 
key). This procedure is not necessary for disk SAVEs, but you 
must disable the Proofreader this way before a tape SAVE. 

SAVE to tape erases the Proofreader from memory, so 
you'll have to LOAD and RUN it again if you want to type 
another listing. SAVE to disk does not erase the Proofreader. 


Replace Original Proofreader 


If you typed in the original version of the Proofreader (Oc- 
tober 1983 issue), you should replace it with the improved 
version below. We added a POKE to the original version to 
protect it from being erased when you LOAD another pro- 
gram from tape. The POKE does protect the Proofreader, 
and the Proofreader itself was not affected. However, a 
quirk in the VIC-20's operating system means that programs 
typed in with the Proofreader and SAVEd on tape cannot be 
LOADed properly later. If you LOAD a program SAVEd 
while the Proofreader was in memory, you see ?LOAD 
ERROR. This applies only to VIC tape SAVEs (disk SAVEs 
work OK, and the quirk was fixed in the Commodore 64). 

If you have a program typed in with the original Proof- 
reader and SAVEd on tape, follow this special LOAD 
procedure: 

1. Turn the power off, then on. 

2. LOAD the program from tape (disregard the ?2LOAD 
ERROR). 

3. Enter: POKE 45, PEEK(174):POKE 46,PEEK(175):CLR 

4. ReSAVE the program to tape. 

The program will LOAD fine in the future. We strongly 
recommend that you type in the new version of the Proof- 
reader and discard the old one. 


Automatic Proofreader For VIC And 64 


100 PRINT"(CLR]PLEASE WAIT...":FORI-886TO 
1018:READA:CK-CK*A:POKEI,A:NEXT 
IF СК<>17539 THEN PRINT"(DOWN]YOU MAD 
E AN ERROR":PRINT"IN DATA STATEMENTS. 
': END 
SYS886:PRINT"(CLR)(2 DOWN} PROOFREADER 
ACTIVATED. " : NEW 
DATA 173,036,003,201,150,208 
DATA 001,096,141,151,003,173 
DATA 037,003,141,152,003,169 
DATA 150,141,036,003,169,003 
DATA 141,037,003,169,000,133 
DATA 254,096,032,087,241,133 
DATA 251,134,252,132,253,008 
DATA 201,013,240,017,201,032 
DATA 240,005,024,101,254,133 
DATA 254,165,251,166,252,164 
DATA 253,040,096,169,013,032 
DATA 210,255,165,214,141,251 
БАТА 003,206,251,003,169,000 
DATA 133,216,169,019,032,210 
DATA 255,169,018,032,210,255 
БАТА 169,058,032,210,255,166 
DATA 254,169,000,133,254,172 
БАТА 151,003,192,087,208,006 
DATA 032,205,189,076,235,003 
БАТА 032,205,221,169,032,032 
БАТА 210,255,032,210,255,173 
БАТА 251,003,133,214,076,173 
DATA 003 


110 


120 


886 
892 
898 
904 
910 
916 
922 
928 
934 
940 
946 
952 
958 
964 
970 
976 
982 
988 
994 
1000 
1006 
1012 
1018 


EE OFFER! FREE OFFER! 


COMPUTER CASSETTES 
58€ 


т Calculate odds on HORSE RACES with ANY COMPU- 


а i Z TER using BASIC. 
FREE Home Вровев Р tanning Pr сат assette m SCIENTIFICALLY DERIVED SYSTEM really works. TV 
N with each order of 20 or more С-10 s Station WLKY of Louisville, Kentucky used this sytem 
Specify VIC-20, Commodore 64, ТІ-99/4А, TRS-80 CoCo or MC-10 to predict the odds of the 1980 Kentucky Derby. See 
the Wall Street Journal (June 6. 1980) article on 
e C-10 Length/Free Labels e 5 Screw Shell Horse hancicapping This system was written and 
ЖАҢ used by computer experts and is now being made available to home computer owners. This 
Si Storage Box add 12¢ each " * Lifetime money back guarantee method is based on storing data from a large number of races on a high speed, large scale. 
< * 52.00 shipping charge - any quantity computer. 23 factors taken from the “Daily Racing Form" were then analyzed by the 
n inpi computer to see how they influenced race results. From these 23 factors. ten were found to 
(Canadian orders 9400 shipping) be the most vital in determining winners. NUMERICAL PROBABILITIES of each of these 10 
* NJ Residents add 6% sales tax factors were then computed and this forms the basis of this REVOLUTIONARY NEW 
* Send check or money order to: PROGRAM 
Dd Ш SIMPLE TO USE: Obtain "Daily Racing Form ` the day before the races and answer the 10 
PARALLEL SYSTEMS questions about each horse. Run the program and your computer will print out the odds for 
DIE „2ш LLL LS all horses in each race. COMPUTER POWER gives you the advantage! 
Ш YOU СЕТ: 1) Program on cassette or disk. 
Box 772 Dept. V 2) Listng of BASIC programs lor use wh any computer. 
Blackwood, NJ 08012 3) Instructions on how to get the needed data from the ''Daily Racing Form." 
609-227-9634 4) Tips on using the odds generated by the program. 


5) Sample form to simplify entering data for each race. 
---- ——MAIL COUPON OR CALL TODAY: 
3G COMPANY, INC. DEPT. GA (503) 357-5607 
RT. 3, BOX 28A, GASTON, OR 97119 
Yes, | want to use my computer for FUN and PROFIT. Please send те — . programs 
at $29.95 each. Circle the cassette you need: РЕТ/СВМ, МІС-20, Color Computer, 
TRS-80, Sinclair Timex 1000, Atari, Commodore 64 (disk or cassette), 
Apple (disk or cassette) = 
Enclosed is: check or money order MasterCard Visa ae 


ARE YOU TIRED OF PAYING HIGH 
SOFTWARE PRICES FOR YOUR 64? 
JOIN THE CLUB! 


You receive 120 programs, on disk or tape, each year 


Card No. ғ Exp. date 


(10 per month) including business, education, and dies 


games each month. You also receive software 
discounts, free computer consultation, plus much 
more. All this for $40 per year of $60 for 2 years. Send 
check or money order to: The 64 Club, 1260 Oliver, 
Pacific Beach, CA 92109. 


ADDRESS 


CIA x ——— unu И ——— nd © 
START USING YOUR COMPUTER FOR 


FUN апа PROFIT! 
The Beginner's ="{BLU}{RVS}{4 SPACES)" :rem 244 


158 POKE36878,15:F1-36876 :rem 99 
Corner 170 PRINT "(3 DOWN}{GRN}PRESS Fl TO START 
On :rem 29 
(Article on page 86.) 180 GET E$:IF E$<>"{Fl}" THEN 180 :rem 31 
198 PRINT "{CLR}"; :rem 57 
210 FOR I-1TO2:FOR J-1TO4 :rem 182 

BEFORE TYPING... 220 PRINT TAB(2);AS$;B$;A$;BS$:NEXT J 
Before typing in programs, please refer to "How :rem 192 
To Type COMPUTEY's Gazette Programs,” “А 230 FOR J=1T04:PRINT TAB(2);B$;A$;BS;AS:N 
Beginner's Guide To Typing In Programs," and EXT J,I :rem 239 
“The Automatic Proofreader” that appear before 240 FOR І-1Т016:РОКЕ P(I),I:NEXT :rem 127 
the Program Listings. 250 PRINT "{BLK}{2 SPACES}Q=QUIT":rem 201 

260 FOR I-1TO8:B(I)-I:B(I-8)-I:NEXT 
:rem 37 
Program 1:Match-Em (VIC Version) — 5;; rog 1=17016 eee es 
1 РОКЕ 36879,27:PRINT"{CLR}{BLU}":DIM А(1 280 RC=INT(16*RND(@)+1):IF В(ЕС)=0 THEN 2 
6),B(16),C(16),P(16) :rem 81 80 :rem 33 
20 PRINT "(3 SPACES}** МАТСН-ЕМ **";PRINT 290 A(I)=B(RC):B(RC)=0:NEXT :rem 35 
"12 DOWN}CHOOSE TWO LETTERS." :rem 64 300 FOR І-1Т016:В(І)-А(І):МЕХТ :rem 226 
40 PRINT "{DOWN}TRY TO MATCH SHAPES.":PRI 318 FOR I-1TO8 :rem 13 
NT "{DOWN}THE BETTER YOU ARE, 320 F(I)-INT(8*RND(O)):IF Е(І)-і OR F(I)- 
(3 SPACES}THE LOWER YOUR SCORE." 2 OR F(I)-6 THEN 320 :rem 116 
:rem 110 330 NEXT I:SC-0:S-0 :rem 85 

78 PRINT "ÍDOWN)PRESS THE SPACE BAR 340 FOR І-38879Т038882:РОКЕ I,0:NEXT 
[3 SPACES}TO CONTINUE." :rem 46 :rem 78 

80 PRINT "(2 DOWN}PRESS 'Q' TO QUIT AND S 350 PRINT "{DOWN}PRESS 2 LETTERS 

EE ALL SHAPES." :rem 232 (2 SPACES}-{2 SPACES]-" :rem 182 
90 FOR І-1Т016:КЕАр P(I),C(I):NEXT 360 SC=SC+1:SCS$=STR$(SC) :гет 147 
:rem 211 370 FOR I-1 TO LEN(SC$):POKE 8158+I,ASC(M 
100 DATA 7705,2,7709,6,7713,2,7717,6,7793 ID$(SC$,I,1)):NEXT :rem 32 
,6,7797,2,7801,6,7805,2 :гет 141 380 М1-38813:РОКЕ Fl,231 :rem б 
120 DATA 7881,2,7885,6,7889,2,7893,6,7969 390 FOR р=1Т0150:МЕХТ D:POKE Р1,0:геп 103 
,6,7973,2,7977,6,7981,2 :rem 192 400 POKE М1,1:РОКЕ N1,0:GET K$:IF K$=""TH 
140 CC-39720:A$-"(RED)(RVS)Í4 SPACES]":BS ЕМ 400 :геп 232 
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410 
420 
430 
446 
450 
470 


480 
490 


500 
510 


520 
530 


540 
550 
570 
580 
590 
600 
650 
660 
690 
708 
710 
720 
7302 
740 
750 
760 


780 


810 


820 


850 
880 


910 
940 


970 

1000 
1030 
1060 
1080 


1090 


IF (K$<"A") OR (K$>"Q") THEN 400 

:rem 156 
R-ASC(K$)-64:POKE 8093,R:Rl-R :rem 90 
IF К5-"О" THEN 1110 :rem 89 
М-Р(В1):А1-А(В1):ІҒ A(R1)<>@ THEN 470 

:rem 151 
РОКЕ N,24:POKE N+1,24:POKE М%22,24:РО 
KE N+23,24 :rem 254 
ON A(R1) GOSUB 850,880,910,940,970,10 
200,1030,1060:GOSUB 780 :rem 186 
N1-38815 :rem 97 
POKE МІ,1:РОКЕ N1,@:GET K2$:IF K2$="" 
THEN 490 :rem 94 
IF (K2$«"A") OR (K2$»"Q") THEN 490 


:rem 9 

R=ASC(K2$)-64:POKE 8096,R:R2-R 
:rem 144 
IF K2$-"Q" THEN 1110 :rem 139 


IF K2$-K$ THEN POKE 8096,45:GOTO 490 
:rem 78 
N-P(R2):A2-A(R2):1IF A(R2)<>@ THEN 570 
:rem 157 
POKE N,24:POKE N-«*1,24:POKE N+22,24:PO 
KE N+23,24 :rem 255 
ON A(R2) GOSUB 850,880,910,940,970,10 


900,10390,1060:GOSUB 780 :rem 188 
IF А1=0 THEN 600 :rem 208 
IF Al-A2 THEN 650 :rem 25 


POKE Fl,159:FOR D-1TO100:NEXT:POKE Fl 
,135:FOR р=1Т0100:МЕХТ:РОКЕ F1,0:GOTO 
730 :геп 245 
POKE F1,195:FOR-D-1TO100:NEXT:POKE Fl 
,207:FOR р=1Т0100:МЕХТ :rem 177 
POKE F1,215:FOR р=1Т0100:МЕХТ:РОКЕ Fl 
,225:FOR р=1Т0200:МЕХТ:РОКЕ F1,9 
:rem 232 
S=S+1:N=8140+S*2 :rem 74 
ON Al GOSUB 850,880,910,940,970,1000, 


1030,1060:GOSUB 780 :rem 19 
A(Rl)=@:A(R2)=0 :rem 215 
ІЕ 5-8 ТНЕМ 1080 :rem 232 
GET ES:IF ES<>" " THEN 730 :rem 156 
L-R2:N-P(R2):GOSUB 810 :rem 229 
L=R1:N=P(R1):GOSUB 810 :rem 228 


POKE 8093,45:РОКЕ 8896,45:GOTO369 
:rem 22 
NC=N+CC:J=F(B(R)):POKE NC,J:POKE NC+1 
,J:POKE МС+22,7:РОКЕ NC+23,J3:RETURN 
:rem 254 
CL-C(L):POKE N,160:POKE N+CC,CL:POKE 
{SPACE}N+1,16@:POKE N+1+CC,CL :rem 55 
POKE №+22,160:РОКЕ N+22+CC,CL:POKE N+ 
23,160:POKE N+23+CC,CL:POKE N,L:RETUR 
N :rem 33 
POKE N,233:POKE N+1,223:POKE М-22,95: 
POKE N+23,105:RETURN :rem 183 
POKE N,85:POKE N+1,73:POKE N+22,74:PO 
KE N+23,75:RETURN :rem 53 
POKE N,32:POKE N+1,233:POKE N+22,233: 


POKE N+23,168:RETURN :rem 173 
РОКЕ М,108:РОКЕ N+1,123:POKE N+22,124 


:POKE N+23,126:RETURN :rem 227 
POKE N,98:POKE N+1,98:POKE N+22,226:P 
OKE N+23,226:RETURN :rem 157 
POKE N,225:POKE N+1,97:POKE N+22,225 
:РОКЕ N+23,97:RETURN :rem 186 
POKE N,223:POKE М41,105:РОКЕ N+22,23 
3:POKE N+23,95:RETURN :rem 222 
POKE N,83:POKE N+1,83:POKE N+22,83:P 
OKE N+23,83:RETURN :rem 90 


FOR І-8076 TO 8096:РОКЕ I,32:NEXT 

' :rem 65 
FOR I=1TO25:POKE F1l,INT(6Ø*RND(Ø)+18 
9) :rem 115 


1100 FOR р=1Т0100:МЕХТ D,I:POKE Ғ1,0 
:rem 253 
1110 FOR R-1TO16:N-P(R) :rem 44 
1120 ON B(R) GOSUB 850,880,910,940,970,10 
900,1030,19690 :rem 90 
1130 GOSUB 780:NEXT :rem 93 
1140 PRINT "{UP}TRY AGAIN? (Y/N) 
(7 SPACES)"; :rem 40 
1150 GET Е5:ІЕ E$-"Y" THEN 190 :rem 229 
1160 IF E$«»"N" THEN 1150 :rem 194 
1178 END :rem 160 


Program 2: Match-Em (64 Version) 


ЛЕР 
10 
26 
30 


40 


90 


100 


110 


120 


130 


140 


150 


160 
176 


180 
190 
200 
210 
220 
230 
240 
250 
260 


270 
280 


290 
300 
310 
320 


330 
340 


350 


360 
370 


OKE 53281,6:PRINT"ÍCLR]E73" :rem 253 
DIM A(16),B(16),C(16),P(16) :rem 181 
PRINT TAB(13);"** MATCH-EM **";rem 206 
PRINT "(2 DOWN}CHOOSE TWO LETTERS." 


:rem 98 
PRINT "{DOWN}TRY TO MATCH THE SHAPES." 

:rem 40 
PRINT "{DOWN}THE BETTER YOU ARE, THE L 
OWER YOUR" :rem 168 
PRINT "SCORE WILL BE." :rem 160 
PRINT "{DOWN}PRESS THE SPACE BAR TO CO 


NTINUE." :rem 46 
PRINT "(2 DOWN}PRESS 'Q' TO QUIT AND S 
EE ALL SHAPES." :rem 232 
FOR I-1TO16:READ P(I),C(I):NEXT 
¿rem 
1075,2,1080,6,1085,2,1090,6 
:rem 
1275,6,1280,2,1285,6,1290,2 
:rem 
1475,2,1480,6,1485,2,1490,6 
:rem 
1675,6,1680,2,1685,6,1690,2 
:rem 248 
CC=54272:AS="{RED}{RVS}{5 SPACES}":BS 
="{BLU}{RVS}{5 SPACES}" :rem 252 


211 
DATA 
221 
DATA 
230 
БАТА 
239 
DATA 


POKE54296,15:POKE54291,8:POKE54292,8 
:rem 6 
F1-254287:F2-54286:W-54290 :rem 31 


PRINT "ІЗ DOWN}{WHT}PRESS Fl TO START 
аш :rem 4 
GET ES:IF E$<>"{F1}" THEN 180 :rem 31 


PRINT "{CLR}"; :rem 57 
POKE 53281,1 :rem 33 
FOR I-1TO2:FOR J-1TO5 :rem 183 


PRINT ТАВ(10);А5;В5;А5;В5:МЕХТ J 
:rem 239 


FOR J=1T05:PRINT ТАВ(10);В5;А5;В5;А5: 
NEXT J:NEXT I :rem 99 
FOR І-1Т016:РОКЕ P(I)-41,I:NEXT I 

:rem 88 
PRINT TAB(31);"{BLK}{UP}Q=QUIT" 

:rem 33 
FOR I-1TO8:B(I)-I:B(I4-8)-I:NEXT I 

:rem 110 
FOR І-1Т016 :rem 65 
RC=INT(16*RND(@)+1):IF В(ЕС)=0 THEN 2 
80 :геп 33 
A(I)=B(RC):B(RC)=@:NEXT I :rem 108 
FOR І-1Т016:В(І)-А(І):МЕХТ I :rem 43 
FOR І-1Т08 :геп 13 


F(I)=INT(16*RND(@)):IF Е(І)-і OR Е(І) 
=2 OR Е(І)=6 THEN 320 ¿rem 163 
NEXT І:5С-0;5-0 :rem 85 
FOR І-56250 ТО 56254:РОКЕ I,Ø:NEXT I 
:rem 127 
PRINT "{DOWN}PRESS 2 LETTERS 
(3 SPACES}-{2 SPACES]-" :rem 182 
SC=SC+1:SCS=STR$ (SC) :rem 147 


FOR I-1 TO LEN(SC$):POKE 1978+1,ASC(M 
Ір5(5С5,1,1)):МЕХТ I :rem 108 
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380 


390 
400 


410 


420 
430 
440 


450 
460 


472 


480 
490 


598 


510 


520 
530 


540 


550 
560 


570 


580 
590 
6004 


610 
620 


630 
640 
650 


660 
670 


680 


696 
700 


710 
726 
730 
740 
750 
760 
770 
780 


790 


800 
810 
820 
830 


840 
850 


N1:56154:POKE F1,84:POKE F2,125:POKE 
(SPACE]W, 17 :rem 205 
FOR D-1TO150:NEXT D:POKE W,@  :rem 71 
РОКЕ М1,1:РОКЕ N1,0:GET K$:IF К5-""ТН 


ЕМ 400 :rem 232 
IF (K$<"A") OR (K$>"Q") THEN 400 

:rem 156 
R=ASC(K$)-64:POKE 1882,R:Rl-R :rem 89 
IF К5-"О" THEN 1110 :rem 89 
N=P(R1):A1=A(R1):IF A(R1)«»9 THEN 470 

:rem 151 
FOR I=N TO N+8@ STEP 40 :rem 120 


FOR 2-І TO I+2:POKE J,24:NEXT J,I:GOT 
O 480 :rem 38 
ON A(R1) GOSUB 850,880,910,940,970,10 
900,1030,1060:GOSUB 780 :rem 186 
N1=56157 :rem 96 
POKE М1,1:РОКЕ М1,0:СЕТ K2$:IF K2$="" 
THEN 490 :rem 94 


IF (K2$<"A") OR (K2$>"Q") THEN 499 
ігеп 9 
R=ASC(K2$)-64:POKE 1885,R:R2=R 
:rem 143 
IF K2$="Q" THEN 1110 :rem 139 
IF K2$-K$ THEN POKE 1885,45:GOTO 490 
srem 77 
N=P(R2):A2=A(R2):IF A(R2)<>@ THEN 570 
:rem 157 
FOR I=N TO N+8@ STEP 40 :rem 121 


FOR J=I TO I+2:POKE J,24:NEXT J,I:GOT 
O 600 :rem 33 
ON A(R2) GOSUB 850,880,910,940,970,10 


20,1030,1060:GOSUB 780 :rem 188 
IF А1=0 THEN 600 :rem 208 
IF А1-А2 THEN 650 :rem 25 
POKE Ғ1,21:РОКЕ F2,31:POKE W,17 

:rem 144 
FOR D-1 TO 100:МЕХТ :rem 221 


POKE F1,16:POKE F2,195:POKE W,17 

:rem 209 
FOR D-1 TO 100:МЕХТ:РОКЕ W,@ :rem 251 
GOTO 739 :rem 109 


POKE F1,34:POKE F2,75:POKE W,l7:FOR D 
-1Т0100:МЕХТ :rem 33 
POKE F1,43:POKE F2,52:POKE W,17:FOR D 
-1Т0100:МЕХТ:РОКЕ W,@ :rem 57 
РОКЕ F1,51:POKE F2,97:POKE W,17:FOR D 
-1 TO 100:NEXT :rem 38 
POKE F1,68:POKE Е2,149:РОКЕ W,17:FOR 
{SPACE}D=1 ТО 200:МЕХТ:РОКЕ W,Ó 

:rem 122 
SzS-1:N-1901-«4S*4 :rem 74 
ON Al GOSUB 850,880,910,940,970,1000, 


10390,1060:GOSUB 780 :rem 19 
A(R1)-20:A(R2)-9 :rem 215 
IF S-8 THEN 1080 :rem 232 
GET Е5:ІЕ ES<>" " THEN 730 :rem 156 
2:N-P(R2):GOSUB 810 :srem 229 
L=R1:N=P(R1):GOSUB 810 :rem 228 
POKE 1882,45:POKE 1885,45 :rem 8 
GOTO 360 :rem 112 
NC=N+CC:FOR I-NC TO NC-80 STEP 40 
zrem 11 
FOR J=I TO I+2:POKE J,F(B(R)):NEXT J, 
I zrem 51 
RETURN :rem 120 
CL-C(L) :rem 69 
FOR I=N TO N+80 STEP 40 :rem 121 
FOR J=I TO 1+2:РОКЕ J,16@:POKEJ+CC,CL 
:МЕХТ J,I :rem 104 
POKE P(L)+41,L:RETURN :rem 218 


POKE N,32:POKE N+1,32:POKE N+2,233 
:rem 39 
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860 


870 


880 


890 


900 


POKE N-40,32:POKE N+41,233:POKE N+42, 
160 :rem 81 
POKE N-80,233:POKE N-81,160:POKE N+82 
,160:RETURN :rem 170 
POKE М,32:РОКЕ N+1,16@:POKE N+2,32 
:rem 41 
POKE N-40,160:POKE N-41,160:POKE N+42 
, 166 :rem 133 
POKE N-80,32:POKE М--81,160:РОКЕ N+82, 
32:RETURN :rem 63 


910 POKE N,85:POKE N+1,67:POKE N+2,73 

:rem 6 
920 POKE N+4@,66:POKE N-41,32:POKE N+42,9 
3 :rem 247 
930 POKE №+80,74:РОКЕ N+81,64:POKE N+82,7 
5:RETURN :rem 34 

940 POKE М,108:РОКЕ N+1,98:POKE N+2,123 
:rem 101 
950 POKE N+4@,225:POKE N+41,16@:POKE N+42 
‚97 :rem 93 
960 POKE N-80,124:POKE N+81,226:POKE N+82 
,126: RETURN :rem 174 

970 POKE N,233:POKE М41,160:РОКЕ N+2,223 
:rem 142 
980 POKE N-40,160:POKE N-41,160:POKE N+42 
, 166 :rem 133 
990 POKE М%80,95:РОКЕ N+81,16@:POKE N+82, 
195:RETURN :rem 130 
1000 РОКЕ N,32:POKE N+1,233:POKE N+2,223 
:rem 125 
1010 POKE N+4@,233:POKE N-41,160:POKE N+4 
2,105 :rem 166 


1020 


1100 


POKE N+80,95:POKE N+81,105:POKE N+82 
, 32: RETURN :rem 113 


1030 POKE N,112:POKE М%1,114:РОКЕ N+2,110 
:rem 168 

1040 POKE N-40,107:POKE N+41,91:POKE N+42 
245 :rem 125 

1050 POKE М%80,109:РОКЕ N+81,113:POKE N+8 
2,125:RETURN :геп 210 

1060 FOR I=N TO М+8@ STEP 40 :rem 166 
1070 FOR 1-І ТО I+2:POKE J,83:NEXT J,I:RE 
TURN :rem 100 

1080 FOR І-1864 ТО 1885:РОКЕ І,32:МЕХТ I 
:rem 135 
` 1898 FOR I-1TO25:POKE Fl,INT(60*RND(2)-«34 


):POKE F2,INT(100*RND(2)-455) :rem 63 
POKE W,17:FOR D-1TOl100:NEXT D:POKE W 


,O:NEXT I :rem 126 
1110 FOR R-1TO16:N-P(R) :rem 44 
1120 ON B(R) GOSUB 850,880,910,940,970,10 

00,1030,1060 :rem 90 
1130 GOSUB 780:NEXT R :rem 175 
1140 PRINT "{UP}TRY AGAIN? (Y/N) 

(7 SPACES)"; :rem 40 
1150 GET Е5:ІЕ E$-"Y" THEN 190 :rem 229 
1160 IF E$«»"N" THEN 1150 :rem 194 
1178 END :rem 160 


Machine Language 
For Beginners 


(Article on page 116.) 
Program 2: vic siist 


10 


I=12288 

READ A:IF A=256 THEN 50 

POKE I,A:CK=CK+A:I=I+1:GOTO 20 

END 

IF CK<>7019 THEN PRINT"ERROR IN DATA S 
TATEMENTS":STOP 


12288 
12294 
12300 
12306 
12312 
12318 
12324 
12330 
12336 


Program 3: 64 slist 


10 І-49152 

20 READ A:IF А-256 THEN 50 

POKE I,A:CK=CK+A:I=I+1:GOTO 20 
END 

IF CK<>7307 THEN PRINT 
{SPACE}STATEMENTS" : STOP 
49152 DATA 162,1,32,198, 255,162 
49158 DATA 6,32,287,255, 202, 208 
49164 DATA 250,32,207,255,164,144 
49170 DATA 208,28,201,0,240,14 
49176 DATA 201,32,144,241,201,128 
49182 БАТА 176,237,32,210,255,76 
49188 DATA 13,192,169,13,32,210 
49194 DATA 255,162,3,76,7,192 
49200 DATA 32,204,255,96,256 


Power BASIC: 
Numeric Keypad 


(Article on page 120.) 


Program 1: 
Numeric Keypad (64 Version) 


3 FORI-50176TO50261:READX: POKEI,X 
4 NEXT 
10 


БАТА 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


162,1,32,198,255,162 
6,32,207,255,202,208 
250,32,207,255,164,144 
208,28,201,0,240,14 
201,32,144,241,201,128 
176,237,32,210,255,76 
13,48,169,13,32,210 
255,162,3,76,7,48 
32,204,255,96,256 


"ERROR ІМ DATA 


:rem 40 
zrem 115 
FORI-40960TO49151:POKEI,PEEK(I):NEXT 


:rem 142 


20 


FORI-57344TO65535:POKEI,PEEK(I):NEXT 


:rem 151 


25 PRINT"TRANSFERRED" 


:rem 120 


986 
912 
918 
924 
930 
936 
942 
948 
954 
960 
966 
972 
978 
984 
990 
996 


I=PEEK(56)*256 :rem 146 
SH-I/256:SL-17 :rem 208 
RH-SH:RL-56 :rem 82 
POKEI+2,SL:POKEI+7,SH :rem 226 
POKEI+36, RH: POKEI+39,RL :rem 77 
SYS (PEEK(56)*256) : END :rem 110 
DATA 120,169,77,141,20,3 :гет 100 
DATA 169,3,141,21,3,88 :rem 4 
DATA 169,0,133,254,96,104 :rem 152 
DATA 133,251,104,133,252,104 :геп 33 
DATA 133,253,165,253,72,165 :rem 1 
DATA 252,72,165,251,72,169 :rem 218 
DATA 3,72,169,110,72,8 :rem 7 
DATA 169,0,72,72,72,76 :rem 13 
DATA 191,234,234,165,197,201  :rem 56 
DATA 8,208,103,173,141,2 :rem 97 
DATA 41,4,240,96,165,254 :rem 115 
DATA 201,0,240,16,169,0 :rem 43 
DATA 133,254,32,159,255,165  :rem 253 
DATA 197,201,64,208,247,24 :rem 208 
DATA 144,68,169,255,133,254 :rem 7 
DATA 32,159,255,165,197,201 :rem 8 
DATA 64,208,231,162,0,189 :rem 154 
DATA 119,2,201,85,208,2 :rem 43 
DATA 169,52,201,73,208,2 :rem 104 
DATA 169,53,201,79,208,2 :rem 108 
DATA 169,54,201,74,208,2 :rem 110 
DATA 169,49,201,75,208,2 :rem 112 
DATA 169,50,201,76,208,2 :rem 102 
DATA 169,51,201,77,208,2 :rem 116 
DATA 169,48,157,119,2,232 :rem 165 
DATA 224,10,208,203,104,168 :геп 250 
DATA 104,170,104,64,165,254 :геп 254 
DATA 201,0,208,189,24,144 :rem 150 
DATA 241,256 :rem 34 


evets 


(Article on page 52.) 


Program I: Nevets—VIC Version 
5 PRINT"{CLR}{BLK}{9 DOWN} WE ARE ON THE 


{ 


SPACE]WAY ТО {22 RIGHT][2 SPACES]THE 


30 


РОКЕ 58823,76:РОКЕ58824,0:РОКЕ58825,19 
6 :rem 70 


{RVS}LAND OF ADNERB{OFF}" 
10 POKE52,28:POKE56,28:CLR 


:геп 171 
:rem 18 


31 POKE58586,169:POKE58587,1:POKE58588, 23 
4 :rem 134 
32 FORI-44929TO449034:POKEI,234:NEXT 

:rem 103 
40 POKE 1,53 :rem 88 
500 DATA2@1, 14, 240, 65, 44, 40, 196, 24 
0, 28, 201, 85, 240, 48, 201 :rem 221 
510 DATA73, 240, 40, 201, 79, 240, 40, 20 
1, 74, 240, 16, 201, 75, 240 :геп 221 
520 DATA16, 201, 76, 240, 16, 201, 77, 24 
ОПОВ 24, 96, 0, 169 :rem 103 

530 DATA 49, 208, 248, 169, 50, 208, 244, 

169, 51, 208, 240, 169, 52, 208 

:rem 163 

540 DATA 236, 169, 53, 208, 232, 169, 54, 

208, 228, 169, 48, 208, 224, 169 

:rem 224 

550 DATA 255, 77, 40, 196, 141, 40, 196, 
(5РАСЕ)88, 165, 198, 240, 252, 120, 7 
6 :rem 117 
560 БАТА 180, 229 :rem 23 


Program 2: 
Numeric Keypad (VIC Version) 


5 POKE56,PEEK(56)-1:POKE55,0:CLR :rem 132 


10 I-PEEK(56)*256 :rem 143 
20 READ A:IF A-256 THEN 40 :rem 54 
30 РОКЕ I,A:I=I+1:GOTO 20 :rem 130 


20 


30 


40 


50 
55 


60 


X-236879:Y-41.25:FORI-7168TO7679:POKEI, 
PEEK(1I+2569@) : POKEX, Y: Y=Y+.25:NEXT 

:rem 60 
FORC=7432T07511:READA: POKEC, A: NEXT: POK 
E36869,255 :rem 117 
DATA129,66,36,24,24,36,66,129,16,24,28 
,30,27,25,24,255,8,24,56,120,216,152,2 
4,255 :rem 91 
DATA24,24,24,24,24,24,24,255,255,153,1 
539759535353 :rem 127 
DATA255,145,82,0,27,216,0,74,137 

:rem 236 
DATA16,56,56,84,146,56,40,40,16,24,12, 
6,3,1,0,0,8,24,48,96,192,128,0,0 

ігеп 37 
DATA129,90,36,90,90,36,90,129 :геп 99 
PRINT"(CLR]":X-7944:CL-30720:FORA-1TO2 
: FORB=1TO22: POKEX+CL, 6: POKEX, 37:X=X+1: 


NEXT: X=X+198 ігеп 26 

МЕХТ :rem 167 

| FORA-7713TO8175STEP22: POKEA+CL, 0: POKEA 

,32:МЕХТ :rem 44 
ҒОКВ=0Т096 : КЕАРрсС:РОКЕВЗ1+В,С:МЕХТ 

:rem 45 

DATA169,0,141,62,3 :rem 94 


БАТА141,60,3,141,61,3,169,0,141,19,14 
5,169,127,141,34,145,173,32,145,41,12 
8 :rem 82 

COMPUTE!'s Gazette April 1984 


143 


140 
145 


150 


155 
160 
165 
168 
170 
180 
185 


190 


200 


210 


215 


220 


225) 


230 
235) 


240 
245 


250 
255 
260 
265 
270 
275 
280 
285 
290 
295 
300 


305 


310 


315 
316 
320 
325 


330 
400 


рАТА201,0,208,5,169,1,141,60,3,169,25 
5,141,34,145,173,17 ігеп 171 
DATA145,41,8,201,0,208,5,169,22 

:rem 225 
DATA141,60,3,173,17,145,41,16,201,0,2 
08,5,169,1,141 :rem 169 
БАТА61,3,173,17,145,41,4,201,0,208,5 

:rem 207 
DATA169,22,141,61,3,173,17,145,41,32, 
201,0,208,5,169,1,141,62,3,96:геп 147 
V=0:GOTO170 :rem 106 
FORI-7680TO7745:POKEI,32:NEXT :rem 23 
E=8 : J=16 : YY=@ : W= : U=0 :rem 205 
РОКЕЕ, 32: POKEK, 32: POKEQ, 32: GOSUB900:G 
OSUB8@@ : FORX=7757TO8175STEP22: POKEX, 3 
2:NEXT :rem 71 
GOSUB95@: YY=YY+1 : IFYY=19THENYY=1 : E=E- 
(E*.5):J2J-(J*.5) :rem 12 
А=8175:С=36:р=0:1=0:0=0:Т15="000000": 
Y20:W-Wtl1:Q-A:AA-36874:POKEAA-*4,15:BB 
-200:СС-1 :rem 163 
SYS831:M-PEEK(828)-PEEK(829):P-PEEK(8 ` 
30) Ç :rem 39 
D=D+1 : IFD=ETHEND=9 : POKEF , 32 :F=F+G:POK 
EF+CL,2:POKEF, 39: IFPEEK(F+G)=38THENGO 
SUB700 zrem 203 
IFPEEK(F+G+22) <>37THENPOKEF, 32:GOSUB9 
00 :rem 80 
I=I+1:IFI=JTHENI=@0:POKEK, 32:K=K+L: РОК 
EK+CL, 2: POKEK, 39: IFPEEK (K+L)=38THENGO 
SUB600 :rem 12 
ІЕРЕЕК(К-І,-22)<>37ТНЕМРОКЕК,32:С051/В8 
20 :rem 95 
IFR=1THEN245 :геп 174 
IFP=1THENQ=A:S=SS:T=TT:R=1:GOTO245 

:геп 208 
GOTO270 :rem 104 
IFPEEK(Q+22+S)=37ORPEFK(Q+22+S)=38THE 
NPOKEQ, 32 :R=0:GOTO270 :rem 7 
IFPEEK(Q+22+S )=39THENY=Y+1 : POKEQ, 32:0 
=Q+22+S:POKEQ+CL, 7: POKEQ, 42: GOSUB499: 
GOTO260 :rem 10 
GOTO265 :rem 114 
POKEQ, 32: POKEF , 32: POKEK, 32 :GOSUB800:G 
OSUB900:R=0:GOTO270 :rem 216 
POKEQ, 32:Q=Q+22+S: POKEQ, T: POKEAA+1 , BB 
+S :rem 131 
ІЕМ--22ТНЕМВ-33:50Т0280 :rem 100 
В-32 :rem 130 
IFA+M>81850RA+M<7746THENM=9 : B=32 

:rem 107 
ІЕМ-1ТНЕКС-34:М-0:55-1:ТТ-40 :rem 196 


IFM=-1THENC=35 :M=9:SS=-1:TT=4l:rem 28 
IFM=210RM=-21THENM=8 :rem 192 
POKEA, B: A=A+M: POKEA, C: POKEAA+CC, BB+M 
:rem 191 
PRINT" {HOME} {WHT} TIME {BLK} "6Ø-INT(TI/ 
6@)"{LEFT} ":PRINT"{HOME}{1@ RIGHT} 
{WHT} LEVEL{BLK}";W :rem 1 
PRINT" {HOME} (DOWN) {WHT}H.S. {BLK}";V:P 
RINT" {HOME} {DOWN} {10 RIGHT} {WHT }SCORE 
{BLK} ";0:ІЕТІ/60>=60ТНЕМ509 :rem 56 
PRINT" {HOME}{2 DOWN} {16 RIGHT}{WHT}HA 
VE{BLK}";Y :гет 188 
PRINT" {НОМЕ} {2 DOWN}{WHT}NEVETS REMAI 
N{BLK}";YY-Y ігеп 57 
POKEAA+2, Ø: POKEAA+1 ,@:CC=CC+1:IFCC=3T 
HENCC=1 :rem 99 
IFY-YYTHENU-U-(19*(690-INT(TI/69))):GO 
Т0180 :rem 236 
GOTO200 :rem 97 
U=U+5@:POKEAA+3,BB:FORX=15TO@STEP-1:P 
OKEAA+4, X : FORDD=1T05@ : NEXT : NEXT: POKEA 
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A+3,@ :rem 17 
410 POKEAA+4,15:RETURN :rem 81 
500 POKEAA+4,0:PRINT"{HOME}{2 DOWN} {BLK} 

{6 SPACES}GAME{2 SPACES}OVER 

{6 SPACES]":FORX-1TO2000:NEXT:rem 236 


505 IFU>VTHENV=U :rem 41 
510 PRINT" {HOME}{2 DOWN}{BLK}PRESS TRIGGE 

R TO START" :rem 254 
520 P=PEEK(37151):FB=-((PAND32)=6):rem 94 
530 IFFB<>1THEN520 :гет 32 
540 GOTO 168 :rem 113 
600 РОКЕК,32:РОКЕК-І,,32:0-О%1:ІҒЕО-4ТНЕМ50 

0 :rem 27 
610 GOTO800 :rem 104 
700 POKEF,32:POKEF+G,32:0=0+1:I1FO=4THEN5G 

2 гет 13 
7180 GOTO900 :rem 106 
800 N=INT(RND(1)*4)+1:ONNGOTO810,820,830, 

840 :rem 203 
810 K=7922:L=+1:RETURN :rem 46 
820 :rem 52 
830 :rem 43 
840 : :rem 49 
900 H=INT(RND(1)*4)+1:ONHGOTO910,920,930, 

940 :rem 196 
910 F=7922:G=+1:RETURN :rem 37 
920 :rem 43 
930 2 :rem 34 
940 F=8163:G=-1:RETURN :rem 40 


950 X-7932:POKEX-*CL,4:POKEX,38:X-X-2:POKE 
X+CL,4:POKEX,38:X=X+218: POKEX+CL ,4: PO 
КЕХ,38 :гет 18 

960 X=X+2 :POKEX+CL , 4 :POKEX, 38 : RETURN 

:rem 54 


Program 2: Nevets—64 Version 


2 PRINTCHR$(142):POKE56,48:CLR :rem 47 
3 FORL=54272T054296: POKEL, 8: NEXT: POKE5429 
6,15:POKE54277,72:POKE54278,90 :rem 242 
4 HF-54273:LF-54272:V0-54276 :rem 53 
5 POKE53281,1:POKE53280,15:PRINT"(CLR) 
(12 DOWN}"TAB(1@)"{RED}PLEASE WAIT A MO 
MENT" :rem 20 
10 PRINTCHR$(142):POKE56334,PEEK(56334)AN 
D254 :rem 96 
11 POKEl,PEEK(1)AND251:FORI-£TO511:POKEI- 
12288,РЕЕК(1+53248):МЕХТ :rem 136 
13 РОКЕ1,РЕЕК(1)ОК4:РОКЕ56334,РЕЕК (56334) 
OR1 :rem 83 
20 POKE53272, (PEEK(53272) AND240) OR12 
:rem 247 
30 FORC-12800TO12879:READA: POKEC,A:NEXT 
:rem 156 
40 DATA129,66,36,24,24,36,66,129,16,24,28 
,30,27,25,24,255 :rem 44 
45 DATA8,24,56,120,216,152,24,255:rem 134 
50 DATA24,24,24,24,24,24,24,255,255,153,1 
597 L537 1535 1597159; 255 :rem 71 
55 рАТА145,82,0,27,216,0,74,137 :rem 36 
60 DATA16,56,56,84,146,56,40,40,16,24,12, 
6,3,1,0,0,8,24,48,96,192,128,0,0 
y zrem 37 
70 DATA129,90,36,90,90,36,90,129 :rem 99 
73 PRINT"{CLR}{12 DOWN}"TAB(16)"{RED}NEVE 
TS":FORI-1TO2000:NEXT :rem 20 
75 PRINT" {CLR}":CL=54272:FORX=1584T01623: 
POKEX+CL, 6: POKEX, 68 : POKEX-4004CL , 6 


:rem 165 

80 POKEX-400,68:NEXT :rem 193 
90 GOTO 168 :rem 65 
100 JV-PEEK(56320):P-15-(JVAND15):FR-JVAN 
D16 :rem 81 

101 IFP=@ANDFR=16THENRETURN :rem 252 
105 IFP-QANDC-65THENS-41;:T-71 :rem 247 


106 


110 


265 


305 


IFP=@ANDC=66THENS=39:'T=72:RETURN 


:rem 27 
IFP=1THENA=A-40:IFA<1164THENA=1164:RE 
TURN :rem 3 
IFP-2THENA-A-40:IFA»2004THENA-2904:RE 
TURN :rem 249 
IFP=4THENC=66 :S=39:T=72: RETURN 

:rem 131 
IFP=5THENA=A-4@ : C=66:S=39:T=72:IFA<11 


64THENA=1164: RETURN ігеп 158 
ІЕР-ӨТНЕМА-А440:С-66:5-39:Т-72:ІҒА>20 
G4THENA=2964 : RETURN :гет 148 
IFP=8THENC=65 :S=41:T=71:RETURN: rem 127 
IFP=9THENA=A-4@ :C=65:S=41:T=71:IFA<11 
64THENA=1164:RETURN :rem 154 
IFP-lOTHENA-A-40:C-65:9-241:T-71:IFA»2 


004 THENA-2004 : RETURN :rem 183 
RETURN :rem 118 
у=@ :rem 98 
E=8:J=16:YY=0:W=0:U=0:FORI=1024TO1263 
:РОКЕІ,32:МЕХТ :rem 102 
POKEF , 32: POKEK, 32: POKEQ, 32 :rem 51 


F-1944:K-F:G-1:L-G:FORX-1084TO2094STE 
P490 :POKEX, 32 :rem 205 
NEXT :GOSUB95@ : YY=YY+1: IFYY=19THENYY=1 
:E-E-(E*.5):J2J-(J*.5) :rem 133 
А=2004:С=67:0=0:1=0:0=0:ТІ$="000000": 
Y=0:W=W+1 :rem 243 
GOSUB1100 :rem 225 
GOSUB100:POKEA+CL,@:POKEA,C:IFA<2004T 
HENPOKEA+40+CL,@:POKEA+40,64 :rem 155 
IFP-20RP-60RP-10THENPOKEA-4Q-4CL,1:POK 
ЕА-СІ,,0:РОКЕА,С :rem 248 
IFFR-OANDA«2004THENQ-A :rem 59 
POKEHF,34:POKELF, 75: POKEVO, 65: FORI-1T 
O5:NEXT :rem 69 
IFFL=1THENPOKEF, 32 : GOSUB89@ : F=KK: G=LL 


:rem 84 
POKEF , 32: F=F+G: POKEF+CL, 2: POKEF, 70 

:rem 26 
IFPEEK(F+G)=73ANDFL=@THENPOKEVO, 64:60 
TO700 :rem 112 


IFPEEK(F+4+G ) <>68THENPOKEF, 32: POKEVO 
,16:GOSUB899 : F=KK:G=LL :гет 157 
POKEHF,45:POKELF,198:POKEVO,17:FORI-1 
TO5:NEXT :rem 124 
IFKL=1THENPOKEK, 32 : GOSUB8@9 : K=KK: L=LL 


:rem 106 
POKEK, 32: K=K+L: POKEK+CL, 2: POKEK, 70 

:rem 58 
IFPEEK(K+L )=73ANDKL=@THENPOKEVO, 64:GO 
TO600 :rem 128 
IFPEEK(K+40+L) <>68THENPOKEK, 32: POKEVO 
,16:GOSUB800 : KZKK : L=LL :rem 184 
KL=ð : FL=@: IFFR=8THEN235 ігеп 105 


С05/В1000:РОКЕА-СІ,,0:РОКЕА,С:ІҒА<2004 
ТНЕМРОКЕА--40-СІ,,0:РОКЕА“40,64:геп 207 
ТЕР-2ТНЕМРОКЕА-4й-СІ,1:РОКЕА-СІ,0:РОК 


ЕА,С :rem 5 
IFFR=@ANDQ<20@@4ANDC<>67THENPOKEQ, 32:G 
OTO242 :rem 156 
с0Т0305 :rem 103 


POKEHF, 199: POKELF, 85 : POKEVO, 17: FORI=1 
Т010:МЕХТ :rem 157 
IFPEEK(Q+S )=7STHENPOKEQ, 32:Q=Q+S: POKE 
Q+CL, 11: POKEQ, 69: GOSUB499 : GOTO305 
:rem 154 
IFPEEK (Q+S )=73THENPOKEQ+S+CL, 2: POKEQ+ 
5,73:60Т0305 :rem 53 
IFPEEK(Q+S )=680RPEEK(Q+S ) =69THENPOKEQ 
, 32:POKEVO,16:FR=16:GOTO395 :rem 10 
ІЕС<>67ТНЕМО-О%5:РОКЕО-СІ,,0:РОКЕО,Т 
:rem 236 
POKEVO,16:PRINT" {HOME} ( BLU) TIME(BLK]" 


306 
310 


311 


315 


320 
321 
322 
323 
324 
325 
326 
327 
328 


330 
400 


405 
406 
410 


500 


505 
510 


520 
530 
540 
600 


619 
700 


710 
800 


810 
820 
830 
840 
950 


960 


1000 


1005 
1010 


1020 
1030 
1040 


1050 
1100 


1110 


60-ІМТ (ТІ/60)"{ІЕЕТ} "; :rem 24 
PRI A (Зот n PME EP рК айдап 174 
PRINT" {HOME}{DOWN}{BLU}HIGH SCORE 
(BLK)";V; :rem 160 
PRINTTAB(39)"(BLU)SCORE(BLK]";U:IFTI/ 
60>-6йЙТНЕМ500 :rem 76 
PRINT" {HOME}{2 DOWN}{BLU}NEVETS REMAI 
NING {BLK}";YY-Y;SPC(11)"{BLU}HAVE 
[BLK]";Y :rem 175 
IFY=YYTHENU=U+ (19*(60-INT(TI/68))):GO 
TO175 :rem 235 
GOSUB1408 : POKEA+CL, @: POKEA, C: IFA <2004 
ТНЕКРОКЕА“-404СІ,,0:РОКЕА--40,64:геп 207 
IFP=2THENPOKEA-49+CL, 1: POKEA+CL,@:POK 


EA,C :rem 5 
IFFL=1ORKL=1THEN200 :rem 142 
IFFR<>@THEN200 :rem 43 


IFPEEK(Q+S)=7@THENPOKEQ, 32 :Q=Q+S: POKE 
Q+CL,11:POKEQ, 69:GOSUB400:GOTO200 
:геп 147 
IFPEEK(Q+S )=73THENPOKEQ+S+CL, 2: POKEQ+ 
S,73:GOTO200 :гет 46 
IFPEEK(Q+S)=68ORPEEK(Q+S)=69THENPOKEQ 
,32:РОКЕУО,16:ЕК-16:С60Т0200 :rem 9 
IFC<>67THENPOKEQ, 32:Q=Q+S: POKEQ+CL, ð: 
POKEQ,T:GOTO211 :rem 62 
GOTO200 :rem 97 
U=U+5@ : Y=Y+1:FR=15:KL=1:POKEVO,16:POK 


EHF, 68: POKELF, 209:POKEVO,129 :геп 5 
IFPEEK(F)=69THENFL=1 :гет 191 
IFPEEK(K)=69THENKL=1 :rem 202 


FORI=1TO5@:NEXT:POKEVO,128:POKEQ,32:R 
ETURN :rem 238 
PRINT" {HOME}{3 DOWN}{BLK}{15 SPACES]G 
AME{2 SPACES]OVER":FORX-1TO2000 : NEXT 

:rem 87 
IFU»VTHENV-U :rem 41 
PRINT" {DOWN} {BLK} {1 SPACES}PRESS TRI 


GGER TO START" :геп 218 
P-PEEK(56320):FR-PAND16 zrem 51 
IFFR<>9THEN5 26 :rem 47 
GOTO 170 :rem 106 
РОКЕК, 32 :POKEK+L, 32:0=0+1:1Е0=4ТНЕМ50 
2 :rem 27 
GOSUB8@@ : K=KK: L=LL: GOTO235 ігеп 111 


POKEF, 32: POKEF+G, 32:0=0+1: IFO=4THEN5S 
2 :rem 13 
GOSUB800 : F=KK: G=LL: GOTO222 :rem 98 
N=INT(RND(1)*4)+1:ONNGOTO819, 829,839, 


840 :rem 203 
KK=1544:LL=+1 : RETURN :rem 191 
KK=1583:LL=-1:RETURN :rem 197 
KK=1944:LL=+1 : RETURN :rem 197 
KK=1983 :LL=-1 : RETURN :rem 203 


X=1563:POKEX+CL, 2: POKEX, 73: X=X+2 : POKE 
X+CL, 2: POKEX, 73 :X=1963:POKEX+CL , 2 


srem 97 

POKEX, 73 :X=X+2: POKEX+CL, 2: POKEX, 73: RE 

TURN :rem 138 
JV=PEEK (56320) :P=15-(JVAND15) 

гет 152 

IFP=@THENRETURN :rem 33 


IFP=1THENA=A-49 : IFA<1164THENA=1164:R 
ETURN :rem 51 
IFP-2THENA-A-40:IFA»2004THENA-2094:R 
ETURN :rem 41 
IFP=4THENC=66 : RETURN :rem 73 
IFP=8THENC=65 : RETURN :rem 77 
RETURN :rem 166 


PRINT"[HOME][20 DOWN}"TAB(17)"{RED}L 
EVEL[BLK]";W:FORI=1TO1000:NEXT:PRINT 
" [HOME ] " :гет 87 
FORI-1824TO1863:POKEI,32:NEXT:RETURN 
:rem 74 
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French Tutor 


(Article on page 70.) 


BEFORE TYPING... 


Before typing in programs, please refer to "How 
To Type COMPUTE!’s Gazette Programs," "A 
b yc Guide To Typing In Programs," and 


e Automatic Proofreader” that appear before 


the Program Listings. 


Program 1: vic French Tutor, 
Part 1: Redefined Characters 


10 
20 


410 


146 


РОКЕЗ6879,237 :rem 105 
PRINT"{CLR} {4 RIGHT}{4 DOWN}{BLK}"CHRS 
(122) :rem 245 
FORT=1T08 srem 231 


PRINTTAB(4)"{BLK}"CHR$(125)"{BLU}{RVS} 
{4 SPACES}{WHT}{4 SPACES}{RED} 


{4 SPACES}" :rem 161 
МЕХТ :rem 164 
PRINTTAB(4)"([BLK)"CHR$(125) :rem 13 
PRINTTAB(4)"ÍBLK]"CHR$(125) :rem 14 
51-36876:У-36878:РОКЕУ,10 :rem 96 
READN,D :rem 67 
ІЕМ--2ТНЕМ170 :rem 209 
POKES1, (ABS(N)) ігеп 55 
FORT=1TO(ABS(D) ) :rem 155 
NEXTT :rem 39 
РОКЕ51,0 :rem 164 
ҒОҺМ-1Т020:МЕХТМ :rem 5 
GOTO9Ø :rem 57 
FORT=1TO2000@:NEXTT :rem 115 
GOTO2198 :rem 101 


DATA-201,-125,-291,-187,-201,-62,-215 
,-250,-215,-250,-219,-250,-219,-250,- 
228,-375 :rem 112 
БАТА-223,-125,-215,-1000,-2  :rem 247 


POKE36879, 26:PRINT"{CLR}{BLK}{9 DOWN) 
"TAB(6)"VIC FRENCH": PRINTTAB(7) "TUTOR 
IAL" :rem 76 
PRINTTAB(7)"K8 TJ" :rem 220 


PRINT"{7 DOWN}{RIGHT}DEFINING CHARACT 
ERS" srem 30 


X-PEEK(56)-2:POKE52,X:POKE56,X:POKE51 
,PEEK(55):CLR :rem 15 
CS=256*PEEK(52)+PEEK(51) :rem 23 


FORI=CSTOCS+511:POKEI, PEEK(1+32768-CS 
):NEXT :rem 166 
READX :rem 15 
IFX=-1THEN37@ :rem 222 
IFX<@THEN290 :rem 177 
FORI=XTOX+7 : READJ :rem 87 
IFJ<@THEN3 29 :rem 159 
POKEI,J:NEXT :rem 254 
GOTO2998 :rem 108 


PRINT"(CLR)(BLK)Í19 DOWN)"SPC(5)"INST 
RUCTIONS?": PRINT: PRINTSPC(7)"{RED}Y 
{BLK}ES OR {RED}N{BLK}o" :rem 163 


СЕТА$:ІҒА$ <> "М"АМРА$ <> "Ү"ТНЕМ380 
ігеп 51 
IFAS="N"THENPOKE36869, 255:GOTO555 
:rem 167 


PRINT" {CLR}{BLK}{6 DOWN)IN ORDER TO C 
REATE", "FRENCH ACCENTS IN","THIS PROG 
RAM, CERTAIN" ігеп 8 
PRINT"LETTERS HAVE BEEN","RE-DEFINED 

[SPACE }USING", "PROGRAMMABLE", "CHARACT 
ERS." :rem 215 
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420 


430 


440 


450 


460 


470 


480 


490 


500 


510 


520 


530 


585 


540 
550 
555 
560 
576 


580 


600 


610 


620 


630 


640 
650 


660 
670 
680 
690 
695 
700 
710 


720 


PRINT:PRINT"PRESS {RED}C{BLK} TO CONT 
INUE." :rem 224 
GETA$:IFA$«»"C"THEN430 :rem 209 
PRINT"(CLR])ÍDOWN]ÍSLK]THE FRENCH CHAR 
ACTERS":PRINT"ARE {BLU}BLUE{BLK}, THE 


dns Namur :rem 147 
PRINT"{3 SPACES}EQUIVALENTS {GRN}GREE 
N{BLK}. ":PRINT :rem 207 
POKE36869, 255 :rem 161 


PRINTTAB(4)"{BLU}< {BLK}{RVS}= {СЕМ} 
«(oFF)"sPC(4)"(BLU)4 {BLK}{RVS}= 
{GRN}#" :rem 69 
PRINT: PRINTTAB(4)"{BLU}$ {BLK}{RVS}= 
{SPACE} {GRN}${OFF}"SPC(4) "{BLU}% 
{BLK} {RVS}= {GRN}3" ігеп 155 
PRINT: PRINTTAB(4)"{BLU}& {BLK}{RVS}= 
{SPACE} {GRN}&{OFF}"SPC(4) "{BLU}+ 
{BLK}{RVS}= {GRN}+" :rem 172 
PRINT: PRINTTAB(4)"{BLU}£ {BLK}{RVS}= 
{GRN}£{OFF}"spc(4)"{BLU}@ {BLK} 
{Rvs}= {GRN}@" :rem 58 
PRINT: PRINTTAB(4)"{BLU}* {BLK}{RVS}= 
{SPACE} (GRN] * (OFF) "SPC(4)"(BLU)1 
(BLK)(RVS)- {GRN}T" :rem 19 
PRINT: PRINTTAB(4)"{BLU}[ {BLK}{RVS}= 
{SPACE} {GRN}[{OFF}"SPC(4)"{BLU}] 
{BLK} {RVS}= {GRN}]" :rem 116 
PRINT: PRINTTAB(4)"{BLU}= {BLK} {RVS}= 
{SPACE} (GRN]- (OFF) "SPC(4)"ÍBLU)« 
{BLK} {RVS}= {GRN}<" :rem 247 
PRINT:PRINTTAB(4)"{BLU}> {BLK}{RVS}= 
{SPACE} {GRN} > {OFF} "SPC(4) "(BLU)/ 
{BLK} {RVS}= {GRN}/" :rem 228 
PRINT:PRINT"{BLK}PRESS {RED}C{BLK} TO 


CONTINUE." :rem 115 
GETAS:IFAS<>"C"THEN550 :rem 215 
РОКЕЗ6879,237 :геп 167 


PRINT"(CLR)Í8 DOWN}{2 RIGHT}{BLK}ONE 
{SPACE}MOMENT PLEASE." :rem 235 
PRINT: PRINTTAB(6)"UN MOMENT, ":PRINTTA 
B(3)"S'IL VOUS PLA]T.ÍWHT]" :геп 180 
РОКЕ198,5:РОКЕ631,78:РОКЕ632,69:РОКЕ6 
33,87:РОКЕ634,13:РОКЕ635,131:ЕМр 
гет 27 
DATA7168,8,16,126,64,126,64,126,0 
:rem 84 
DATA7168,8,16,126,64,126,64,126,9 
:rem 85 
рАТА7384,24,36,0,60,66,66,60,0 
:rem 187 
DATA7392,28,34,64,64,34,28,8,16 
:rem 253 
рАТА7400,8,20,0,62,8,8,62,0 :rem 25 
рАТА7408,16,8,126,64,126,64,126,0 
:rem 86 
DATA7416,30,40,72,78,72,40,30,0 
ігеп 231 
DATA7448,16,8,66,66,66,66,60,0 
:rem 211 
DATA7456,24,36,0,66,66,66,60,0 
:rem 199 
DATA7464,36,0,60,66,66,66,60,0 
srem 199 
рАТА7472,30,40,72,126,72,72,78,0 
:rem 44 
DATA7504,16,8,60,66,126,66,66,0 
:rem 243 
рАТА7504,16,8,60,66,126,66,66,0 
:гет 244 
DATA7512,24, 36,9,69,66,126,66,9 
srem 232 


725 DATA7544,36,0,66,66,66,66,60,0 


:rem 203 
730 DATA7648,36,0,126,64,126,64,126,0 

:rem 85 
740 DATA7656,24,36,126,64,126,64,126,6 

:rem 139 
750 DATA7664,20,0,62,8,8,8,62,0 :rem 39 
760 DATA-1 :rem 21 


Program 2: VIC French Tutor, 
Part 2: Vocabulary Drill And Translator 


1 POKE36879,27:PRINT"(CLR]":LS$2"FRENCH":K 
$="ENGLISH":RS="{23 SPACES}":POKE36869, 


240 :rem 37 
2 PRINT"[CLR][BLU][RVSI]"R$"ENTER DESIRED 
{SPACE }NUMBER"RS :rem 62 


3 PRINT:PRINT"{GRN}1){BLK} "L$" TO "K$SPC 
(5)"VOCABULARY DRILL":PRINT:PRINT"ÍGRN] 
2) (BLK)"K$" TO "L$SPC(5)"VOCABULARY"; 

:rem 60 

4 PRINT" DRILL":PRINT:PRINT"{GRN}3) {BLK} 
"L$" TO "KSSPC(5) "TRANSLATOR": PRINT: PRI 
NT"{GRN}4) {BLK}"K$" TO "LSSPC(5)"TRANS 
LATOR" :rem 53 

5 PRINT:PRINT:PRINT"{3 RIGHT}{RVS}{CYN}PU 
SH {RED}RETURN{CYN} AFTER"SPC(5)" EACH 
{SPACE}WORD INPUT "SPC(5)" IN THIS PROG 


RAM {OFF}" :rem 159 
6 GETMQS:IFVAL(MQS)«1ORVAL(MQS$)»4THEN6 

:rem 114 

8 POKE36869,255:0NVAL(MQ$)GOTO9,18,27,35 
:rem 60 
9 CO-0:SC-0:PRINT"ÍCLR)ÍBLK)(DOWN)HOW MAN 
Y WORDS?" :rem 165 
10 СЕТА5:ІҒУАІ(А5)<1ТНЕМ10 :rem 5 
11 LETN=VAL (AS) :IFCO=NTHEN14 :гет 229 
12 PRINT" {CLR} {DOWN} {САМ} TRANSLATE" : PRINT 
"INTO "KS; :гет 147 

13 PRINT" {HOME}{2 DOWN}{RED}"TAB(13)CO+1" 
{LEFT} OF"N:GOSUB43 :геп 229 

14 IFCO=NTHENGOSUB44:GOTO9 :rem 212 
15 PRINT"(HOME)ÍBLK)(5 DOWN}"WS;:INPUTTS 
:rem 39 


16 IFTS=ESTHENSC=SC+1:CO=CO+1:PRINT" {BLU} 
CORRECT ": FORL=1T01596:NEXTL:GOTO11 
:rem 25 
17 IFTS<>ESTHENCO=CO+1: PRINT" {BLU}WRONG ! 
{SPACE}IT'S (РОВ)"; Е9:ЕОВТ-1Т01500:МЕХ 


TT:GOTO11 :rem 91 

18 CO=0:SC=0@:PRINT"[CLR][BLK][DOWN]HOW MA 
NY WORDS?" :rem 213 

19 GETAS:IFVAL(A$)<1THEN19 :rem 23 

20 LETN-VAL(A$):IFCO-NTHEN23 :rem 229 

21 PRINT"(CLR)(DOWN])(GRN) TRANSLATE":PRINT 

"INTO "L$; :rem 148 

22 PRINT" {HOME}{2 DOWN}{RED}"TAB(13)CO+1" 

{LEFT} OF"N:GOSUB43 :rem 229 

23 IFCO=NTHENGOSUB44:GOTO18 :rem 4 
24 PRINT" {HOME}{BLK}{5 DOWN}"ES; :INPUTTS 
:гет 21 


25 IFTS=WSTHENSC=SC+1:CO=CO+1:PRINT" {BLU} 
CORRECT" : FORL=1T01599:NEXTL: GOTO29 
:rem 43 
26 IFTS$<>WS$THENCO=CO+1:PRINT" {BLU }WRONG! 
{SPACE}IT'S (PUR])";W$:FORT-1TO1500:NEX 
TT:GOTO20 :rem 127 
27 PRINT"ÍCLR])ÍDOWN](ÍBLK)ENTER "L$" WORD 
(5 SPACES}OR {GRN}M{BLK} TO GO TO MENU 


y :rem 137 
28 X$="XX":PRINT"{BLK}":INPUTTS :геп 244 
29 IFTS$="M"THENRUN :rem 100 


30 
31 


32 
33 
34 


35 


36 
37 
38 
39 


46 


41 
42 


43 


44 


45 


46 


47 


48 


49 


51 


52 


53 


54 


55 


56 


57 


58 


59 


60 


61 


62 


READES ,W$ :rem 143 
IFW$=T$THENPRINT"{2 RIGHT][BLU]"ES:FOR 
T=1TO1500:NEXTT: PRINT: RESTORE: GOTO27 


srem 255 
IFWS$-XSTHENPRINT"(2 RIGHT}{BLU}TRY AGA 
IN. ":RESTORE:GOTO28 :rem 73 
IFES <>TSTHEN3@ :rem 226 
PRINT"{BLU}{2 RIGHT}TRY AGAIN.":RESTOR 
E:GOTO28 :rem 89 


PRINT" {CLR} {DOWN}{BLK}ENTER "K$" WORD 
{4 SPACES}OR {GRN}M{BLK} TO GO TO MENU 
" 


:rem 135 
X$="XX":PRINT"{BLK}"sINPUTTS :геп 243 
IFT$-"M'THENRUN :rem 99 
READES ,WS :rem 151 


IFES$-T$THENPRINT"(2 RIGHT)(BLU)"W$:FOR 
T-1TO15990:NEXTT:PRINT:RESTORE:GOTO35 


:rem 6 
IFE$=X$THENPRINT"{2 RIGHT}{BLU}TRY АСА 
IN.":RESTORE:GOTO36 :rem 53 
IFWS <>TSTHEN38 :rem 251 
PRINT" {BLU} {2 RIGHT}TRY AGAIN.":RESTOR 
E:GOTO36 :rem 87 
X=INT(RND(1)*1@1)+1:RESTORE: FORM=1TOX: 
READES , W$ :NEXTM: RETURN :rem 49 


PRINT: PRINT" {CLR}{BLK}{4 DOWN}OUT OF"; 
N; "WORDS YOU {3 RIGHT}HAVE CORRECTLY"S 
PC(8)"TRANSLATED";SC;"{LEFT}.":rem 122 
PRINT: PRINT"YOUR SCORE IS"; INT((SC/N)* 
100);5РС(6)"РЕЕ CENT." :rem 41 
PRINT: PRINT"GO AGAIN?":PRINT" {DOWN} 

{2 RIGHT}{RED}Y{BLK} - YES":PRINT" 

{DOWN}{2 RIGHT}{RED}M (BLK)- RETURN TO 


MENU" :rem 228 
GETQ$ : IFQ$<>"Y"ANDQS$<>"M"THEN47 :rem 2 
IFQ$="Y"THENRETURN srem 89 
IFQ$="M"THENRUN srem 99 
DATASUMMER, @T@,APPLE, POMME , HERE, ICL, TH 
ERE, L*,NEST,NID :rem 165 


DATAHOUSE, MAISON, FARM, FERME, WHERE, 0#,S 
AME ,M=ME, BOX, BO]TE, FRENCH, FRAN£AIS,CA 
KE, G+TEAU :rem 7 
DATACOW, VACHE, HORSE, CHEVAL, BIRD, OISEAU 
»CHRISTMAS, NO<L, EGG, <UF, EYE, <IL,WORK 

1 *UVRE :rem 132 
DATACOST, COST, TASTE, GOST, RATHER, PLUT[T 
» BELIEVE, CRO]RE,HEAD, T=TE, BEAST, B=TE,K 
EY,CL@ :rem 154 
DATANAME , NOM, YES, OUL,NO,NON,NOSE,NEZ,C 
OFFEE,CAF@,BOY,GAR£ON, DAY, JOUR, CASTLE 
, CH+TEAU :rem 217 
DATABLACK,NOIR,BLUE,BLEU,RED,ROUGE,GRE 
EN, VERT,WHITE, BLANC, PURPLE, VIOLET, YELL 
OW, JAUNE :rem 144 
DATAFEBRUARY,FGVRIER,KNOT,N«UD,TASK,T 
*CHE,PUPIL,QGLÍVE,PASTE,P-TE,FOREST,FOR 
zT,OR,OU :rem 100 
DATACHOIR,CH«UR,BONE,OS,BEAR,OURS,GOA 
T,CHÍVRE,CITY,CITQ,NUT,NOIX,MOON,LUNE, 
BEEF, B<UF :rem 148 
DATAFATHER, PÎRE, MOTHER, MfRE, BABY, B@BQ, 
FAIRY, F@E, IRON, FER, FIRE, FEU, WINDOW, FEN 
=TRE :rem 48 
DATARULE, RTGLE, RICE, RIZ,CORN,MA>S, MAST 
ER,MA]TRE,WHEAT,BL@, VERY, TRTS, SOON, T[T 
WINE, VIN :rem 37 
DATALIFE, VIE, JUNE, JUIN, TAIL, QUEUE, FOOT 
,PIED,ARM, BRAS, WORD,MOT, LEG, JAMBE, CHIL 
D,ENFANT ігеп 21 
DATASTRONG, FORT, BUILD, B+TIR,AT, *, SWORD 
, @P@E, FINGER, DOIGT, HEART, C<UR, SKY, CIE 
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63 


64 


L,BEAK,BEC :rem 61 
DATAHOUSE,MAISON,DOOR,PORTE,SOAP,SAVON 
,CUT,COUP , LIP ,LÎVRE , SCHOOL , @COLE , SUN, S 
OLEIL :rem 16 
DATAMILK,LAIT,TEA, TH@, WATER, EAU,ARROW, 
FLTCHE, END, FIN, AUNT, TANTE, TOOTH, DENT , X 
х,хх :rem 79 


Program 3: 64 French Tutor 


100 


110 


120 


130 


146 


150 


160 


170 


180 
190 


200 
210 


220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 


340 
350 


360 
365 
370 


375 
380. 


390 


400 
410 


420 


DATA SUMMER, @T@,APPLE, POMME,HERE,ICI, 
THERE, L*,NEST,NID :гет 208 
DATAHOUSE, MAISON, FARM, FERME, WHERE, O#, 
SAME ,M=ME, BOX, BO]TE srem 183 
DATAFRENCH , FRAN£AIS, CAKE, G+TEAU 

:rem 252 
DATACOW, VACHE, HORSE, CHEVAL, BIRD, OISEA 
U, CHRISTMAS , NO<L :rem 32 
DATAEGG, <UF, EYE, <IL,WORK, «<UVRE 

:rem 19 
DATACOST, COST, TASTE, GOST, RATHER, PLUT[ 
T, BELIEVE, CRO]RE :rem 68 
DATAHEAD, T=TE, BEAST, B=TE, KEY,CL@ 

:rem 8 

DATANAME , NOM, YES, OUL,NO,NON,NOSE,NEZ, 
COFFEE, CAF @ , BOY ,GAR£ON :rem 152 
DATA DAY,JOUR,CASTLE,CH+TEAU :rem 246 
DATABLACK, NOIR, BLUE, BLEU, RED, ROUGE,GR 
EEN, VERT ,WHITE, BLANC :rem 21 
DATAPURPLE, VIOLET, YELLOW, JAUNE: rem 42 
DATAFEBRUARY, F@VRIER, KNOT, N<«UD, TASK, 
T+CHE, PUPIL, @LTVE :rem 98 
DATAPASTE, P+TE, FOREST, FOR=T, OR, OU 

ігеп 171 
DATACHOIR,CH«UR,BONE,OS,BEAR,OURS,GO 
AT,CHTVRE :rem 19 
DATACITY,CIT@,NUT,NOIX,MOON, LUNE, BEEF 
, B<UF :rem 45 
DATAFATHER, Pf RE, MOTHER, Mf RE, BABY, B@B@ 
, FAIRY, F@E, IRON :rem 193 
DATAFER, FIRE, FEU, WINDOW, FEN=TRE 

:rem 30 
DATARULE,RÍGLE,RICE,RIZ,CORN,MA»S,MAS 
TER,MA]TRE,WHEAT,BLG :rem 81 
DATAVERY,TRÍS,SOON,T[T,WINE,VIN 

:rem 143 
DATALIFE, VIE, JUNE, JUIN, TAIL, QUEUE, FOO 
T, PIED, ARM, BRAS :rem 190 


DATAWORD, MOT, LEG, JAMBE, CHILD, ENFANT 
ігеп 12 


DATASTRONG, FORT, BUILD, B+TIR,AT, *,SWOR 
D, @P@E, FINGER, DOIGT :rem 179 
DATAHEART , C<UR, SKY, CIEL, BEAK, BEC 

:rem 57 
DATAHOUSE, MAISON, DOOR, PORTE, SOAP, SAVO 
N,CUT,COUP,LIP,LTVRE :гет 158 
DATASCHOOL, @COLE, SUN, SOLEIL :rem 30 
DATAMILK, LAIT, TEA, TH@, WATER, EAU, ARROW 


,FLÍCHE,END,FIN,AUNT,TANTE :геп 180 
DATATOOTH, DENT , XX, XX :rem 80 
РОКЕ53280,6 :rem 49 


POKE53281,12:CH-54272: FORT-CHTOCH-* 24: 


POKET,Z:NEXT:PRINTCHR$(142) :геп 159 
POKECH+24,15 :rem 124 
РОКЕСН+5,17:РОКЕСН+6, 241: POKECH, 108 
ігеп 18 
PRINT"{CLR}{8 RIGHT}{6 DOWN}{BLK}"CHR 
$(122) :rem 197 
FORT=1TO10 :rem 65 
PRINTTAB(8)"{BLK}"CHR$(125)"{BLU} 


{RVS}{8 SPACES}{WHT}{8 SPACES}{RED} 
{8 SPACES}" :гет 214 
МЕХТ :rem 213 
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430 
440 
450 


451 
460 
470 
480 
490 
510 
520 
530 
560 
570 


580 
590 


600 
605 
610 
620 
630 
640 
650 
660 
670 
680 
690 
7002 
719 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 


820 
830 


840 


850 
860 


870 


880 


PRINTTAB(8)"(BLK)"CHR$(125) :rem 66 
PRINTTAB(8)"ÍBLK]"CHR$(125) :rem 67 
FORT=8TOISTEP 0 :READAS:IF AS="XX"THE 
NT=1 : READAS :rem 71 
NEXT :rem 217 
READN, D :rem 116 
ІЕр--2ТНЕМ560 :rem 212 


РОКЕСН+1, (АВЅ(М№)):РОКЕСН+4,33:гет 137 
FORT-1TO(ABS(D)):NEXT :rem 30 
POKECH+4, 32 :rem 64 
FORN-1TO20:NEXTN :rem 6 
GOTO460 :rem 197 
PRINTCHRS (14) :GOTO599 :rem 240 


DATA-16,-125,-16,-187,-16,-62,-22,-25 
0,-22,-250,-25,-250,-25,-250,-33,-375 
:rem 230 


DATA-28,-93,-22,-375,-2,-2 :rem 222 


PRINT" {CLR}{BLK}{11 DOWN}"TAB(15)"64 

{SPACE} FRENCH (DOWN) " : PRINTTAB (15) "TUT 
ORIAL" | :rem 93 
PRINTTAB(15)"K8 TJ" :rem 13 


PRINT"{3 DOWN}{3 RIGHT}PLEASE WAIT... 
DEFINING CHARACTERS" ` :гет 19 
PRINT: PRINT :rem 235 
Х-48:РОКЕ56,Х :гет 241 
С5-12288 :гет 113 


POKE56334, PEEK(56334)AND254: POKE1, PEE 
K(1)AND251 :rem 187 


FORI=CSTOCS+4995 : POKEI, PEEK (I+4896@) : 
NEXT :rem 24 
READX :rem 16 
ІЕХ--1ТНЕМ740 :rem 233 
IFX«OTHEN660 :rem 188 
FORI=XTOX+7 : READJ :rem 97 
IFJ«OTHEN690 :rem 170 
POKEI-5120,J:NEXT :rem 242 
POKE1, PEEK(1)OR4:POKE56334, PEEK(56334 
)OR1 :rem 136 
GOTO660 :rem 111 


PRINT"(CLR)(BLK)(10 DowN]"sPC(13)"INS 
TRUCTIONS? {DOWN}":PRINTSPC(15)"{RVS}Y 
{OFF}ES OR {RVS}N{OFF}O" :гет 188 


GETAS : IFAS <>"N"ANDAS <> "Ү"ТНЕМ750 
:rem 53 
ІБАб-"М"ТНЕМ1150 :rem 86 


PRINT"(CLR)(BLK)Í6 DOWN}{2 RIGHT}IN O 
RDER TO CREATE FRENCH ACCENTS IN 


{рому} " :rem 123 
PRINT"{8 RIGHT}THIS PROGRAM, CERTAIN 
{DOwN}" :rem 235 
PRINT"{2 RIGHT}LETTERS HAVE BEEN RE-D 


EFINED USING{DOWN}" :rem 86 
PRINT"{8 RIGHT}PROGRAMMABLE CHARACTER 
S.{DOWN}" :rem 233 


PRINT"Í10 RIGHT}{5 DOWN}PRESS {RVS}C 
{OFF} TO CONTINUE." 2 :rem 139 
GETAS:IFAS<>"C"THEN820 :rem 215 


PRINT"[CLR]ÍDOWN][4 RIGHT}{BLK}THE FR 
ENCH CHARACTERS ARE BLACK,"  :rem 236 
PRINT"{4 RIGHT}THEIR 64 EQUIVALENTS A 
RE {WHT}WHITE{BLK}.{2 DOWN}"  :rem 86 
POKE53272, 29 :rem 102 
PRINTTAB(12)"« {RVS}={OFF} {RVS} 

{WHT }<{OFF}{BLK}"SPC(4)"# {RVS}= 

{OFF} {RVS}{WHT}#{OFF}{BLK}" :rem 225 
PRINT: PRINTTAB(12)"S {RVS}={OFF} 

{RVS} {ИНТ} $ {ОРЕ} (BLK) "SPC(4)"$ {RVS}= 
{OFF} {RVS}{WHT}3{OFF}{BLK}" :геп 55 
PRINT: PRINTTAB(12)"& {RVS}={OFF} 

{RVS} {WHT }& {OFF} {BLK}"SPc(4)"+ {RVS}= 
{OFF} {RVS}{WHT}+{OFF}{BLK}" :геп 72 


890 


900 


910 


920 


930 


940 


950 
952 


955 
960 
965 
970 
975 
980 
985 
990 
995 
1000 
1005 
1010 
1015 
1020 
1025 
1030 
1035 
1040 
1150 
1160 
1165 
1170 
1180 


1190 


1200 


1210 
1228 
1225 


1230 


PRINT:PRINTTAB(12)"£ {RVS}={OFF} 
{RVS} {WHT }£{OFF}{BLK}"SPC(4)"@ {RVS} 
-(оғЕ) {RVS}{WHT}@{OFF}{BLK}":rem 223 
PRINT:PRINTTAB(12)"* {RVS}={OFF} 
{RVS} {WHT }* {OFF} {BLK}"SPC(4)"Î {RVS}= 
{OFF} {RVS} {WHT} Î{OFF}{BLK}" :rem 175 
PRINT:PRINTTAB(12)"[ {RVS}={0FF} 
{RVS} {WHT}[ {OFF} {BLK}"SPC(4)"] {RVS}= 
{OFF} {RVS}{WHT}]{OFF}{BLK}"  :rem 16 
PRINT:PRINTTAB(12)"- {RVS}={OFF} 
{RVS} {WHT}={OFF}{BLK}"SPC(4)"< {RVS}= 
{OFF} {RVS} {ИНТ} « (OFF) (BLK])" :rem 147 
PRINT:PRINTTAB(12)"» {RVS}={OFF} 
{RVS} {WHT }> {OFF} {BLK} "SPC(4)"/ {RVS}= 
{OFF} {RVS}{WHT}/{OFF}{BLK}" :rem 124 
PRINTTAB(9)"{2 DOWN}{BLK}PRESS {RVS}C 


{OFF} TO CONTINUE." :rem 43 
GETAS: IFAS<>"C"THEN95@ :rem 223 
DATA7168,8,16,126,64,126,64,126,0 
:rem 94 
DATA7168,8,16,126,64,126,64,126,0 
:rem 97 
рАТА7384,24,36,0,60,66,66,60,0 
:rem 194 


DATA7392,28,34,64,64,34,28,8,16:rem 8 
DATA7400,8,20,0,62,8,8,62,0 :rem 31 
DATA7408,16,8,126,64,126,64,126,0 
:rem 96 
DATA7416,30,40,72,78,72,40,30,0 
:rem 
DATA7448,16,8,66,66,66,66,60,0 
:rem 
DATA7456,24,36,0,66,66,66,60,0 
:rem 
рАТА7464,36,0,60,66,66,66,60,0 
:rem 
DATA7472,30,40,72,126,72,72,78,0 
:rem 
рАТА7504,16,8,60,66,126,66,66,0 
¿rem 
DATA7504,16,8,60,66,126,66,66,0 
:rem 
рАТА7512,24,36,0,60,66,126,66,0 
:гет 
DATA7544,36,9,66,66,66,66,60,0 
:rem 240 
рАТА7648,36,0,126,64,126,64,126,0 
:rem 131 
DATA7656,24,36,126,64,126,64,126,0 
:rem 180 
:rem 84 


236 
220 
203 
207 
73 
34 
30 


22 


DATA7664,20,0,62,8,8,8,62,0 
БАТА-1 :rem 61 
POKE53272,29:CLR:RESTORE :геп 9 
PRINT"(CLR]":L$-"FRENCH":K$-"ENGLISH 
> zrem 65 
:rem 196 
:rem 93 


R$-"(23 SPACES}" 
POKE53282, 7 


PRINT" {CLR} {DOWN} {WHT} (RVS) "sPC(10)" 
ENTER DESIRED NUMBER" :rem 121 
PRINT"{2 DOWN}{WHT}1){BLK} "L$" TO " 


KS" {WHT}-{BLK} VOCABULARY DRILL" 
:rem 232 
PRINT"{2 DOWN}{WHT}2) {BLK}"KS" TO " 
L$" {WHT}-{BLK} VOCABULARY DRILL" 
:rem 225 
PRINT"{2 DOWN}{WHT}3) (BLK)"LS" TO " 
KS" {WHT}-{BLK} TRANSLATOR" :rem 126 
PRINT"{2 DOWN}{WHT}4) {BLK}"K$" TO " 
L$" {WHT}-{BLK} TRANSLATOR" :rem 128 
PRINT"{2 DOWN}{WHT}5) {BLK}END THE P 
ROGRAM" zrem 128 
PRINT"{4 DOWN}{3 RIGHT}{RVS}{WHT}PUS 


1240 
1250 


1255 
1260 


1270 
1280 
1290 
1300 
1310 


1320 
1330 


1340 


1345 
1350 


1360 


1370 
1380 
1390 
1400 


1410 
1420 


1430 


1435 
1440 


1450 


1460 
1470 


1480 
1490 


1500 


1510 
1520 


1530 


1540 


1558 
1560 
1570 


H {BLK}RETURN{WHT} AFTER EACH WORD I 
МРОТ (DOWN) " ; :rem 153 
PRINTSPC(16)"IN THIS PROGRAM":rem 29 
GETMQ$ : IFVAL(MO$) «10RVAL(MQ$ )>5THEN1 
250 ігеп 151 
ІРУАҺ(М09)-5ТНЕМ5Ү52048 :rem 192 
POKE53272, 29:0NVAL (MO$)GOTO1270,1369 
,1450,1530 zrem 67 
CO-0:SC-0:PRINT"(CLR)(BLK] (2 DOWN} 
(3 RIGHT)HOW MANY WORDS?" :rem 158 
СЕТА5:ІҒУАҺ(А5)<1ТНЕМ1280 :rem 217 
LETN-VAL(A$):IFCOZNTHEN1320 :rem 176 
PRINT"ÍCLR)ÍA4 DOWN}{3 RIGHT]TRANSLAT 
E":PRINT"{3 RIGHT}INTO "K$ :геп 124 
PRINT"Í2 UP}"TAB(24)CO+1"{LEFT} OF"N 
:GOSUB1619 srem 122 
IFCO-NTHENGOSUB1620:GOTO1270 :геп 39 
PRINT"{3 DOWN}{7 RIGHT]"W$; :INPUTTS$ 
:rem 142 
IFT$-E$THENSC-SC-1:CO-CO-*1:PRINT" 
{7 RIGHT}{2 DOWN}{WHT}CORRECT !{BLK} 
";FORL=1TO2E2:NEXTL :rem 12 
IFTS=ESTHENTS="":GOTO1299 :rem 225 
CO=CO+1:PRINT"{7 RIGHT}{2 DOWN}{WHT} 
WRONG 1{2 SPACES}IT'S {BLK}";ES$:FORT 
-1Т01500:МЕХТТ:60Т01290 :rem 212 
CO-0:SC-0:PRINT"(CLR)(Í2 DOWN} 
(3 RIGHT}{BLK}HOW MANY WORDS?" 


:rem 158 
GETAS:IFVAL(A$)«1THEN1370 :rem 217 
LETN-VAL(A$):IFCOZNTHEN1410 :rem 176 


PRINT"ÍCLR]Í4 DOWN}{3 RIGHT}TRANSLAT : 
E":PRINT"{3 RIGHT}INTO "L$; :rem 193 
PRINT" {UP}"TAB(24)CO+1"{LEFT} OF"N:G 
OSUB1619 :геп 233 
IFCO-NTHENGOSUB1620:GOTO1360 :геп 39 
PRINT"{3 DOWN}{7 RIGHT}"E$;:INPUTTS 
srem 124 
IFTS$=WS$THENSC=SC+1 :CO=CO+1:PRINT" 
{WHT}{2 DOWN}{7 RIGHT}CORRECT 1! {BLK} 
":FORL=1TO1500:NEXTL :rem 59 
ІЕТ5-М9ТНЕМ1380 :rem 135 
CO=CO+1:PRINT"{WHT}{2 DOWN}{7 RIGHT} 
WRONG | IT'S (BLK]";W$:FORT-1TO1590: 
NEXTT:GOTO1388 :rem 230 
PRINT" {CLR} {DOWN}.{RIGHT}{BLK}ENTER " 
L$" WORD OR {RVS}M{OFF} TO GO TO MEN 


uU :rem 253 
XS$="XX": PRINT" {DOWN} ( RIGHT] "; : INPUTT 
$ :rem 46 
ІЕТ5-"М"ТНЕМ1160 :rem 152 
READES,WS$ :rem 249 


IFWS=TS$THENPRINT"{DOWN}{2 RIGHT)"E$: 
FORT-1TO1590:NEXTT:PRINT:RESTORE:GOT 
:01450 :rem 188 
IFW$=X$THENPRINT"{DOWN}{2 RIGHT]TRY 
[SPACE]AGAIN.":RESTORE:GOTO1460 

:rem 253 
IFE$<>T$THEN1480 :rem 173 
PRINT"(DOWN)Í(Í2 RIGHT]TRY AGAIN.":RES 
TORE: GOTO1469 :rem 13 


PRINT" {CLR} {DOWN} {RIGHT } {BLK}ENTER " 
K$" WORD OR {RVS}M{OFF} TO GO ТО MEN 


у" :rem 251 
X$2"XX":PRINT"(DOWN) ( RIGHT] "; : INPUTT 
$ :rem 45 
ІЕТ5-"М"ТНЕМ1170 :rem 152 
READES ,WS :rem 248 


IFES=T$THENPRINT"{DOWN}{2 RIGHT]"W$: 
FORT=1T015ØØ :NEXTT : PRINT : RESTORE : GOT 
01530 :rem 186 
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1580 


IFE$=X$THENPRINT"{DOWN}{2 RIGHT]TRY 
{SPACE }AGAIN. " : RESTORE : GOTO154ø 


:rem 242 
1590 IFW$«»TS$THEN1560 :rem 198 
1600 PRINT"(DOWN)(2 RIGHT}TRY AGAIN.":RES 
TORE:GOTO1549 ігеп 11 
1610 X=INT(RND(1)*101)+1:RESTORE:FORM=1TO 
Х:ВЕАрЕ5,М5:МЕХТМ: RETURN :rem 146 
1620 PRINT:PRINT"[CLR][BLK][4 DOWN} 
(3 RIGHT]OUT OF";N;"WORDS, YOU HAVE 
{ SPACE } CORRECTLY" ігеп 71 
1625 PRINT"[12 RIGHT]TRANSLATED";SC;" 
{LEFT}." :rem 8 
1630 PRINT:PRINT"{6 RIGHT]YOUR SCORE IS"; 
INT((SC/N)*100);"PER CENT." :rem 203 
1640 PRINTTAB(15)"[2 DOWN]GO AGAIN?" 
:rem 129 
1645 PRINT"(DOWN])"TAB(16)"([RVS]Y(OFF) - Y 
ES":PRINT"{DOWN}"TAB(11)"{RVS}M{OFF} 
- RETURN TO MENU" :гет 96 
1650 GETQ$:IFQ$«»"Y"ANDQS«»"M'"THEN1650 
:rem 196 
1660 IFO$-"Y"THENRETURN :rem 186 
1670 ІЕО5-"М"ТНЕМ1170 :rem 152 
= 
Making Calendars 
(Article on page 67.) 
BEFORE TYPING... 


Before typing in programs, please refer to "How 


To Type COMPUTEN' Gazette Programs,” "A 
Beginner's Guide To Typing In Programs," and 
“The Automatic Proofreader” that appear before 


the Program Listings. 


Program I: Monthly Screen Calendar 


80 D 


90 5 
8 
100 


105 


110 


111 


130 


292 


ORMZ-12THENE1-31 


293 


294 


295 


297 


298 
300 


GOSUB135@:IFA=4@THENPRINT 


ІММ$ (12) :FORI=1T012:READMS$ (I) :NEXTI 
srem 104 
Ү565517:А=РЕЕК (781) :ІРА=40ТНЕМРОКЕ532 
Lal ігеп 167 
PRINT"[CLR][3 DOWN][2 RIGHT]THIS IS А 
PROGRAM":PRINT"{6 RIGHT}TO SHOW A" 
:rem 109 
PRINT"{3 RIGHT}{PUR}MONTHLY CALENDAR 
{BLU}":PRINT"{4 RIGHT}ON THE SCREEN" 
ігеп 155 
PRINT"{2 DOWN}{2 RIGHT}PLEASE TYPE IN 
THE":PRINT"{3 RIGHT } {RED }MONTH {BLU} 
{SPACE}AND {RED}YEAR{BLU}" :гет 149 
PRINT"{RIGHT}THAT YOU WISH TO SEE":PR 
INT"{DOWN}{2 RIGHT)(EXAMPLE: {RED}12, 
1983{BLU}){PUR}{2 DOWN)" :rem 180 
PRINT"[5 RIGHT]";:INPUTM@0,Y:PRINT" 
{2 DOWN}{5 RIGHT}{PUR}THANK YOU! {BLU} 
{DOWN }" : FORI=1 T0899: NEXT :rem 167 
IFM0=1ORM0=3ORM0=5ORM0=7ORM@0=8ORMD=10@ 
:rem 26 
IFM@=4ORM0=6ORM0=9ORM0=11lTHENEl=30 
:rem 66 
IFM@=2ANDY/4<>INT(Y/4) THENE1=28 
:rem 103 
IFM@=2ANDY /4=ІМТ(Ү/4) THENGOSUB1499 
:rem 83 
PRINT" {CLR} { DOWN) { RIGHT) ( RED] "; M$ (MØ) 
;SUOUSY;"ÍBLU]" :rem 123 
:rem 83 
PRINT"{2 RIGHT}{RED}S{BLU}{2 RIGHT}M 
{2 RIGHT}T{2 RIGHT}w{2 RIGHT}T 
{2 RIGHT}F{2 RIGHT}S" :rem 109 
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395 
310 
320 


321 
322 


323 
324 
325 
326 
327 


330 
331 


332 


333 
334 
335 


340 
341 
345 
346 
1045 


1049 
1050 


1060 
1080 
1100 
1150 
1200 
1210 
1230 
1240 


1244 
1245 


1247 
1249 


1250 
1350 


T355 


1358 


1360 


1400 


1405 
1410 
1420 


GOSUB1360 
D=1:GOSUB1050 


:rem 226 
ігеп 198 


IFD1=7THENFORI=1T019: PRINT" {RIGHT}";: 
NEXT: PRINTD: LFA=4@THENPRINT :rem 53 
IFD1-7THEN330 :rem 211 


IFD1-6THENFORI-1TO16:PRINT"(RIGHT]";: 
NEXT: PRINTD; : GOTO339 ігеп 16 
IFD1=5THENFORI=1T013: PRINT" {RIGHT}"; =: 
NEXT: PRINTD; :GOTO330 :rem 13 
IFD1=4THENFORI=1T019:PRINT"{RIGHT}";: 
NEXT: PRINTD; :GOTO339 :rem 10 
IFD1-3THENFORI-1TO7:PRINT"(RIGHT]";:N 
EXT:PRINTD;:GOTO330 :rem 224 
IFDl-2THENFORI-1TO4:PRINT"ÍRIGHT]";:N 
EXT:PRINTD;:GOTO3360 221 
IFD1=1THENPRINT" (RIGHT) {RED} 
(BLU)";:GOTO330 
FORD=2TOE1 : GOSUB1958 


168 
201 


:rem 
IFD1=1ANDD<=9THENPRINT" { RIGHT} {RED}"; 


D; "{BLU}"; :GOTO345 :rem 114 
IFD1=1ANDD>9THENPRINT"{RED}";D;"{BLU} 


"+:GOTO345 :rem 27 
IFD1=7THEN340 :rem 215 
IFD«-9THENPRINTD; :GOTO345 :rem 105 
PRINT" { LEFT}";D; :GOTO345 :rem 210 


IFD»9THENPRINT"(LEFT]";D:GOTO345 
:rem 12 
PRINTD :rem 105 
IFA-AQANDD1-7THENPRINT :rem 133 
NEXTD :rem 32 
PRINT:PRINT:FL-1:GOSUB1350:1FA-22THE 
NPRINT"(3 UP}" :rem 57 
END :rem 165 

IFM9=1THENM9=13 : Y=Y-1:GOTO1989 
:rem 80 
IFM0=2THENM0=14:Y=Y-1 :rem 23 
М-М0-2 :rem 47 
D1=INT(2.6*M-0.2)+D+Y-1900+INT((Y-19 
00) /4) :гет 207 
D1=D1+INT(19/4)-2*19 :rem 21 
D1=D1-INT(D1/7)*7+1 :rem 235 
IFM9=40RM9=9THEND1=D1+1 :rem 135 

IFM9=13THENM@=1 : Y=Y+1:GOTO1245 
+ e :rem 81 

IFM9=14THENM@=2 : Y=Y+1:D1=D1+1 

:rem 210 
IFD1=8THEND1=1 :rem 86 


IF (Y=2199ANDMG>=3 )OR(Y> 2109) THEND1=D 
1-1: IFD1=@THEND1=7 :rem 198 
IF (Y=229GANDMG>=3 )OR(Y> 2208) THEND1=D 
1-1: IFD1=@THEND1=7 :rem 202 


IF(Y-2300ANDMO»—3)OR(Y»2300)THEND1-D 
1-1: IFD1=@THEND1=7 :rem 206 
RETURN :rem 168 


IFFL=@THENPRINT:FORI=1TO22:PRINT"*"; 
:NEXT: PRINT: RETURN :rem 188 


IFD1=7THENPRINT"{3 UP}":FORI=1T022:P 
RINT"*"; :NEXT: PRINT" {UP}":RETURN 
:rem 119 
FORI=1T022:PRINT"*"; :NEXT: PRINT" {UP} 
": RETURN :rem 21 


PRINT"{2 SPACES]ET3(2 5РАСЕ5)ЕТЯ 

(2 SPACES)ET3(2 5РАСЕ5)ЕТЯ 

(2 5РАСЕ5)ЕТЯ(2 5РАСЕ5?ЕТЯ 

{2 SPACES]ET3":RETURN :rem 42 
IF(Y/109-INT(Y/190))AND(Y/409«» INT(Y 


/400) ) THENE1=28:GOTO1419 :rem 231 
E1-29 :rem 232 
RETURN :rem 166 
DATA"{3 SPACES}JANUARY","{3 SPACES]F 
EBRUARY","{4 SPACES }MARCH", " 

{4 SPACES}APRIL" :rem 210 


1430 DATA"[5 SPACES}MAY","{5 SPACES]JUNE" 
‚"{5 SPACES}JULY","{4 SPACES]AUGUST" 
:rem 172 

1440 DATA"{2 SPACES}SEPTEMBER"," 
{3 SPACES }OCTOBER","{3 SPACES }NOVEMB 
ER", "{3 SPACES}DECEMBER" :rem 193 


Program 2: 
Monthly Calendar For Printer 


1 GOTO19 :rem 203 
5 Е1=1:Е2=1:Е3=1:Е4=1:Е5=1:Е6=1:Е7=1 

:rem 226 

6 GOSUB1199:D8-D7-1:RETURN :rem 103 

10 ОРЕМ1,4:5Ү565517:А-РЕЕК(781):ІҒА-40ТНЕ 

NPOKE53281,1 :rem 156 

20 GOSUB40090:GOSUB3200:PRINT£41,"":rem 176 


30 ОММ0С050в3010,3020,3030,3040,3050,3060 
.3070,3080,3090,3100,3110,3120 :rem 56 
40 PRINT#1,"":PRINT#1,"":GOSUB1619:GOSUB1 


650:GOSUB1660 :rem 207 
80 OND9GOSUB1811,1821,1831,1841,1851,1861 
‚1871 :rem 172 
99 PRINT#1,"":PRINT#1,"" :rem 78 
100 61=р8 :rem 194 
105 G=G1:GOSUB172@:D1=D:E1=E :rem 120 
110 G2-G*1:G-G2:GOSUBl720:D2-D:E2-E 
:rem 10 
115 G3=G+1:G=G3:GOSUB1729:D3=D:E3=E 
:rem 19 
120 G4=G+1:G=G4:GOSUB1726:D4=D:E4=E 
:rem 19 
125 G5=G+1:G=G5:GOSUB1729:D5=D: E5=E 
:rem 28 
130 G6=G+1:G=G6 :GOSUB1729:D6=D: E6=E 
:rem 28 
135 G7=G+1:G=G7:GOSUB1720:D7=D:E7=E 
:rem 37 
140 G1=G7+1:GOSUB1199:PRINT#1,"":PRINT#1, 
"";ІЕСІ<-ЕОТНЕМ105 :rem 188 
155 PRINT#1,"" :rem 236 
1000 с0Т05000 :rem 191 
1109 GOSUB2000:X=F1:X1=D1:GOSUB11000 
:rem 115 
1120 X-E2:X1-D2:GOSUB11000 :rem 242 
1130 X=E3:X1=D3:GOSUB11099 :rem 245 
1140 X-E4:X1-D4:GOSUB11000 :rem 248 
1150 X-E5:X1-D5:GOSUB1100 :rem 251 
1160 X-E6:X1-D6:GOSUB110900 :rem 254 
1170 X-E7:X1-D7:FL-1:GOSUB11990 :rem 59 
1209 GOSUB29000:X-El:X1-D1:GOSUB129000 
:rem 117 
1220 Х-Е2:Х1-р2:605/вВ12000 :rem 244 
1230 X-E3:X1-D3:GOSUB12090 :rem 247 
1240 X-E4:X1-D4:GOSUB12000 :rem 250 
1250 X-E5:X1-D5:GOSUB12000 :rem 253 
1260 X-E6:X1-D6:GOSUB12000 :rem ð 
1270 X-E7:X1-D7:FL-1:GOSUB1209098 :rem 61 
1309 GOSUB2090:X-El:X1-D1:GOSUB130900 
:rem 119 
1320 X-E2:X1-D2:GOSUB13000 :rem 246 
1330 X=E3:X1=D3:GOSUB13009 :rem 249 
1340 X-E4:X1-D4:GOSUB139000 :rem 252 
1350 Х=Е5:Х1=р5:6050В13000 :rem 255 
1360 X-E6:X1-D6:GOSUB13000 :rem 2 
1370 X=E7:X1=D7:FL=1:GOSUB13099 :rem 63 
1409 GOSUB2999:X=E1:X1=D1:GOSUB14909 
:rem 121 
1420 X-E2:X1-D2:GOSUB14000 :rem 248 
1430 X-E3:X1-D3:GOSUB14000 :rem 251 
1440 X-E4:X1-D4:GOSUB14000 :rem 254 
1450 X-E5:X1-D5:GOSUBl14900 :rem 1 
1460 X-E6:X1-D6:GOSUB14000 :rem 4 
1470 X-E7:X1-D7:FL-1:GOSUB14009 :rem 65 


1509 
1520 
1530 
1540 
1550 
1560 
1570 
1600 
1610 
1611 
1612 
1613 
1614 
1615 
1616 


1620 


1621 


1622 


1623 


1624 


1625 


1626 


1650 


1652 


1654 


1656 


1658 
1660 


1665 
1670 
1675 


1680 
1685 
1690 
1695 


1700 


1705 
1710 


1714 


1712 


1715 
1720 
1722 
1726 
1728 


6050В2000:Х-Е1:Х1-р1:6050вВ15000 

:rem 123 
X-E2:X1-D2:GOSUB15000 :rem 256 
X-E3:X1-D3:GOSUB15000 :rem 253 
X=E4:X1= GOSUB15000 :rem 0 
X=E5:X1=D5:GOSUB15000 ігеп 3 
X=E6:X1=D6:GOSUB15000 :rem 6 
X-E7:X1-D7:FL-1:GOSUB15000 :rem 67 
RETURN :rem 167 
PRINT#1,"{5 SPACES]"; :PRINT£&1,CHR$(1 
4)"SUN";:PRINT£&1,CHR$(15)"(5 SPACES} 
Dp :rem 69 
PRINT£1,CHR$(14)"MON";:PRINT£&1,CHRS$( 
15)"{5 SPACES)"; :rem 116 
PRINT£1,CHR$(14)"TUE"; : PRINT#1,CHRS( 
15)"{5 SPACES}"; :rem 121 
PRINT#1,CHRS (14) "WED"; : PRINT#1,CHRS ( 
15)"{5 SPACES}"; :rem 108 
PRINT£&1,CHR$(14)"THU";:PRINT£41,CHR$( 
15)"{5 SPACES)"; :rem 126 
PRINT£1,CHR$(14)"FRI";:PRINT£41,CHR$( 
15)"{5 SPACES)"; :rem lll 
PRINT#1,CHRS$(14) "SAT": PRINT#1,CHRS(1 
bye :rem 1 
PRINT#1,"{5 SPACES]";:PRINT£41,CHR$(1 
4)"---";:PRINT£&1,CHR$(15)"(5 SPACES) 
Фр :rem 215 
PRINT#1,CHRS$(14)"---"; : PRINT#1,CHRS ( 
15)"{5 SPACES}"; :rem 18 
PRINT#1,CHRS$ (14) "---"; :PRINT#1,CHRS ( 
15)"{5 SPACES}"; :rem 19 
PRINT#1,CHRS$(14)"---"; : PRINT#1,CHRS ( 
15)"{5 SPACES}"; :rem 20 
PRINT£1,CHR$(14)"---";:PRINT£1,CHR$( 
15)"(5 SPACES]"; :rem 21 
PRINT£&1,CHR$(14)"---";:PRINT£1,CHR$( 
15)"{5 SPACES}"; :гет 22 
PRINT#1,CHR$ (14) "---":PRINT#1,CHR$(1 
5)" ":RETURN :rem 187 
IFMÜ-lORMQ-3ORMO-5ORMEZ-7O0RMO-B8ORMÉ-1 
ZORM-12THENE9-31 :rem 81 
ТЕМ@=4ОВМ@=6ОВМ@=9ОВМ@=11ТНЕМЕ9=3@ 

:rem 122 
IFMO-2ANDY/4«»INT(Y/4)THENE9-28 

:rem 160 
IFM2-2ANDY/A4-INT(Y/4)THENE9-29 

:rem 102 
RETURN :rem 180 
IFMO-ITHENM2-13:Y-Y-1:GOTO1670 

:rem 92 
ІЕМӢ=2ТНЕММ0=14:Ү=Ү-1 :rem 34 
М-М0-2 ігеп 52 
р9=1МТ(2.6*М-0.2)+0+Ү-1900+ІМТ((Ү-19 
22) /4) :rem 232 
D9=D9+INT(19/4)-2*19 :rem 45 
D9=D9-INT(D9/7)*7+1 :rem 20 
IFMO-A4ORMO-9THEND9-D9-*1 :rem 163 
IFMÜ-IS3THENME-1:Y-Y-1:GOTO1719 

srem 93 
ІЕМ0=14ТНЕММ0=2:Ү=Ү+1 :D9=D9+1 

:rem 227 
IFD9-8THEND9-1 :rem 104 
IF(Y-2100ANDMO»—-3)OR(Y»2100)THEND9-D 
9-1:1FD9-OTHEND9-7 :rem 227 
IF(Y-22900ANDM2»—3)OR(Y»2299) THEND9-D 
9-1:1FD9-OTHEND9-7 :rem 230 
IF(Y-22300ANDMQ»-3)OR(Y»23909)THEND9-D 
9-1:IFD9-OTHEND9-7 srem 233 
RETURN :rem 174 
ІЕС>ЕОТНЕМСОТ01740 5 :rem 144 
IFG«19THENGOTO1742 :rem 117 
IFG»-10ANDG«20THENGOTO1746 :геп 116 
IFG>=2@ANDG<3@THENGOTO1748  :rem 122 
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1730 
1740 
1742 
1746 
1748 
1750 
1755 
1811 
1821 
1831 
1841 
1851 
1861 
1871 
2000 
2001 
2002 
2003 
2004 


2005 
2011 


2012 
2013 
2014 
2015 


2021 
2022 


2023 
2024 
2025 
2031 
2032 


2033 
2034 


2035 
2041 


2042 
2043 


2044 
2045 


2051 
2052 


2053 
2054 


2055 
2061 
2062 


IFG»-30THENGOTO1750 :rem 180 
D=1:E=1:GOTO1755 :rem 176 
D=G+2:E=1:GOTO1755 :геп 37 
D=G-19+2:E=2:GOTO1755 :rem 184 
D=G-290+2 :E=3:GOTO1755 :rem 188 
0=6-30+2:Е=4 :rem 114 
RETURN :rem 178 


D1=1:D2=3:D3=4:D4=5:D5=6:D6=7:;D7=8:G 
OSUB5 : RETURN :rem 149 
D1=1:D2=1:D3=3:D4=4:D5=5 :D6=6:D7=7:G 
OSUB5 : RETURN 1 :rem 143 
D1=1:D2=1:D3=1:D4=3:D5=4:D6=5 :D7=6:G 
OSUB5 : RETURN ігеп 138 
D1=1:D2=1:D3=1:D4=1:D5=3:D6=4:D7=5:G 
OSUB5 : RETURN zrem 134 
D1=1:D2=1:D3=1:D4=1:D5=1:D6=3:D7=4:G 
OSUB5 : RETURN :rem 131 
D1=1:D2=1:D3=1:D4=1:D5=1:D6=1:D7=3:G 
OSUB5: RETURN :rem 129 
D1=3 :D2=4:D3=5 :D4=6:D5=7:D6=8:D7=9:G 
OSUB5 : RETURN :rem 163 
PRINT#1,"{4 SPACES)"; :RETURN:rem 104 


PRINT#1," Е2 +J ";:RETURN :rem 181 
PRINT£1,"KF-3(2 SPACES]E-*3"; :RETU 
RN :rem 182 
PRINT£41,"E-3(2 SPACES]E+3";:RETU 
RN :rem 183 
PRINT£1,"K«*3(2 SPACES]E43"; :RETU 
RN :rem 184 
PRINT#1," E2 +J ";:RETURN :rem 185 
PRINT#1," E+3[2 SPACES]"; :RETURN 
:rem 16 
PRINT#1," E+3[2 SPACES}"; : RETURN 
:rem 17 
PRINT#1," E+3Í2 SPACES]"; : RETURN 
:rem 18 
PRINT#1," E+3[2 SPACES]"; :RETURN 
:rem 19 
PRINT#1," Ез312 SPACES]"; :RETURN 
:rem 20 
PRINT#1," Е2 +3 ";:RETURN :rem 183 
PRINT£1,"F-3(2 5РАСЕ5)ЕЗЯ"; :RETU 
RN :rem 184 
PRINT#1,"{2 ЅРАСЕЅ} +9 ";:RETURN 
:rem 19 
PRINT#1," £+3{2 SPACES)"; : RETURN 
:rem 20 
РКІМТ#1,"Ё4 -3";:RETURN :rem 7 
PRINT#1,"K3 +} ";:RETURN :rem 94 


PRINT#1,"{3 SPACES]E+3";:RETURN 

:rem 19 
PRINT#1," Е2 +J ";:RETURN :rem 186 
PRINT#1,"{3 SPACES]E+3";:RETURN 

:rem 21 
PRINT#1,"K3 +] ";:RETURN :rem 98 
PRINT41,"(2 SPACES]E+3 ";:RETURN 

:rem 19 
PRINT#1," Е2 +J ";:RETURN :rem 186 
PRINT#1,"E+3 E+3 ";:RETURN 

ігеп 187 
PRINT#1,"K4 -3";:RETURN ігеп 8 
PRINT#1,"{2 SPACES]E+3 ";:RETURN 

:rem 23 
PRINT#1,"K4 -3";:RETURN ігеп 6 


PRINT#1,"E+3[3 SPACES]"; : RETURN 
:rem 21 
РвІМТІІ,"ЕЗ +3 ";:RETURN :rem 98 


PRINT#1,"{3 SPACES]EK-*3"; : RETURN 

zrem 23 
PRINT#1,"E3 +] ";:RETURN :геп 100 
PRINT#1," Ё2 43 ";:RETURN :rem 187 
PRINT#1,"E+3[3 SPACES]"; : RETURN 

:rem 22 
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2063 
2064 


2065 
2071 
2072 
2073 
2074 
2075 


2081 
2082 


2083 
2084 


2985 


2091 
2092 


2093 
2094 


2095 
2111 


2112 
2113 
2114 
2115 


3010 


3011 


3012 


3013 


3014 


3015 


3020 


3021 


3022 
3023 
3024 
3025 


3030 


3031 


PRINT£1,"K3 +J ";:RETURN :rem 99 
PRINT#1,"K+3{2 ЅРАСЕЅ } +1"; : КЕТО 


ЕМ :rem 190 
PRINT#1," £2 +3 ";:RETURN :rem 191 
PRINT#1,"K4 -3";:RETURN :rem 8 


PRINT#1,"{3 SPACES}£+]"; : RETURN 


:rem 23 
PRINT#1,"{2 SPACES}£+] ";:RETURN 
:rem 24 
PRINT#1," Ё+9{2 SPACES}";:RETURN 
:rem 25 
PRINT#1," &+3{2 SPACES]"; : RETURN 
:rem 26 
PRINT#1," K2 +3 ";:RETURN :rem 189 


PRINT£1,"E-3(2 SPACES]E-43"; : RETU 


RN :rem 190 
PRINT#1," K2 +3 ";:RETURN :rem 191 
PRINT£&1,"K-3(2 SPACES]E-*3"; :RETU 

RN :rem 192 
PRINT#1," K2 +3 ";:RETURN :rem 193 
PRINT#1," Е2 +} ";:RETURN :rem 190 
PRINT#1,"E+3[2 SPACES}K+]"; : КЕТО 

RN :rem 191 
PRINT#1," ЕЗ +]";:RETURN :геп 102 


PRINT#1,"{3 SPACES])E-*3"; : RETURN 


:rem 27 
PRINT£1," K2 +3 ";:RETURN :rem 194 
PRINT#1,"{2 SPACES]E+3 ";:RETURN 
:rem 17 
PRINT#1,"{2 SPACES}£+] ";:RETURN 
ігеп 18 
PRINT#1,"{2 SPACES]E+3 ";:RETURN 
:rem 19 
PRINT#1,"{2 SPACES]E+3 ";:RETURN 
:rem 20 
PRINT#1,"{2 SPACES]E+3 ";:RETURN 
:rem 21 
GOSUB20900:PRINT£41," ЁЗ +3 
(3 5РАСЕ5)ЕЗ +3[2 SPACES]E+3 
(3 sPACES) E43" :rem 193 


GOSUB20900:PRINT£1,"(2 SPACES]E+3 
(3 SPACES]E+3[3 SPACES]E+3 
Е2 +912 SPACES)E-43" zrem 118 
GOSUB299@:PRINT#1,"{2 5РАСЕ5)Е 3 
(3 SPACES]E+3[3 5РАСЕ6) 3 E+3 
Ені E+3" :rem 119 
GOSUB2000:PRINT#1,"E+3 K+} 
(3 SPACES}£5 +3 K+3[2 SPACES} 
k2 +3" :rem 16 
GOSUB2000:PRINT£&1,"K3 313 SPACES} 
E+3[3 SPACES}K+3 £+3{3 SPACES} 
k+3" :rem 31 
RETURN :гет 169 
GOSUB2096:PRINT#1,"E5 43 E5 +3 
k4 +3 " :rem 166 
GOSUB2696:PRINT#1,"E+3{5 SPACES} 
E+3[5 SPACES}K+3{3 SPACES}£+]" 
:rem 43 
GOSUB2000:PRINT41,"K3 +3{3 SPACES} 
K4 +3{2 SPACES}£4 4*3 " :геп 182 
GOSUB2006:PRINT#1,"£+3{5 SPACES} 
Ё+7{5 SPACES}k+3{3 SPACES}£+]" 
:rem 45 
SPACES } 
zrem 18 


GOSUB29@@: PRINT#1, "E£+9{5 
R5 +3 £4 43 " 

RETURN :rem 170 
GOSUB200@: PRINT#1,"k+4{3 SPACES} 
K*3(2 5РАСЕ5)ЕЗ +3{2 SPACES} 

k4 43 " :rem 105 
GOSUB20909:PRINT41,"K2 +9 K2 +] 

E*3(3 SPACES]E+3 E+3í3 SPACES} 

E73" :rem 196 


3032 


3933 


3034 


3035 
3040 


3041 


3042 


3043 


3044 


3045 
3050 


3051 


3052 


3053 


3054 


3055 
3060 


3061 


3062 


3063 


3064 


3965 
3070 


3071 


3072 


3073 


3074 


3075 
3080 


GOSUB2000:PRINT#1,"E+3 E+3 E+3 
E+3[3 SPACES]E+3 k4 +] " :rem 107 
6050В2000:РКІМТІІ,"Ез3 ЕЗ ЕЗ 
Е5 +3 E+3[2 SPACES]E+3 " 
:rem 18 
GOSUB2090:PRINT£&1,"K-3(3 SPACES} 
E+3 E*3(3 SPACES]E*3 E+3 
(3 SPACES] E43" 
RETURN 
GOSUB2000:PRINT#1," K3 +3 
(2 5РАСЕ5)Е4 +3[2 SPACES}£4 43 " 
:rem 
GOSUB2000:PRINT£&1,"K«-3(3 SPACES} 
E+3 £+3{3 SPACES]E+3 E+3 
[3 SPACES]E+3" :гет 121 
СО50В2000:РВІМТ#1,"Ё+1{3 SPACES} 
Ез3 E4 +112 SPACES}£4 +] " 


:rem 123 
:rem 171 


182 


:rem 18 
GOSUB2098:PRINT41,"E5 43 K+] 
(5 SPACES]E+3[2 SPACES]E+3 " 
:rem 199 
GOSUB2000:PRINT#1,"E+3[3 SPACES} 
E+3 £+3{5 SPACES]E+3[3 SPACES} 
Ені" :rem 214 
RETURN :rem 172 
GOSUB2000:PRINT#1,"E+3[3 SPACES} 
k+3{2 5РАСЕ5)ЕЗ +3{2 SPACES} 
E+3[3 SPACES]E+3" :гет 31 
GOSUB2000:PRINT£1,"K2 +} &2 +] 
E+3[3 SPACES]E+3 EKE+3[3 SPACES} 
Ені" :rem 198 
GOSUB2000:PRINT41,"K-43 E43 Е+Я 
E+3[3 5РАСЕ5}К+7{2 SPACES]E+3 
E+3 " :rem 33 
GOSUB2009:PRINT$&1,"K«3 E+3 E+3 
Е5 +3{3 SPACES]E+3[2 SPACES]" 
:rem 110 
GOSUB2000:PRINT#1,"E+3[3 SPACES} 
E+3 £+3{3 SPACES}£+3{3 SPACES) 


Ё+7{2 SPACES}" :гет 215 
RETURN :rem 173 
GOSUB2890:PRINT£1," ЕЗ +] 


(2 SPACES}+3{3 5РАСЕ5) 34 E+3 

(3 SPACES]E+3" :rem 32 
GOSUB2000:PRINT#1,"(2 SPACES}£+] 

(3 SPACES]E+3[3 ЅРАСЕЅ } Ё+Я 

Е2 +3{2 SPACES]E+3" :rem 123 
GOSUB2000:PRINT#1,"[2 SPACES]E+3 

[3 SPACES]E+3[3 ЅРАСЕЅ}Е+Я E+3 

E+3 E+3" :rem 124 
GOSUB20@00:PRINT#1,"E+3 E+3 

[3 SPACES]E+3[3 SPACES]E+3 E+3 

(2 SPACES]E2 +3" :rem 35 
GOSUB299@:PRINT#1,"k3 +3[4 SPACES} 
ЕЗ +3{2 SPACES]E+3[3 SPACES} 

Ені" :rem 202 
RETURN :rem 174 
GOSUB2000:PRINT#1," ЕЗ +3 

(2 SPACES]E+3[3 SPACES]E+3j Е+Я 

{4 SPACES]" :гет 123 
GOSUB2ØØØ:PRINT#1l,"{2 5РАСЕ5)Е 43 

(3 SPACES]KE+3[3 SPACES]E+3 K+} 

[4 sPACES]" :rem 48 
GOSUB2000:PRINT#1,"[2 SPACES]E+3 

(3 SPACES])E*3(3 SPACES}K+] E+3 

{4 SPACES]" :rem 49 
GOSUB2000:PRINT#1,"E+3 E+] 

(3 SPACES}£+3{3 SPACES}K+]} E+3 
{4 SPACES]" :rem 216 
GOSUB2009:PRINT£1,"K3 +3[4 SPACES} 
ЕЗ +3{2 SPACES}£5 +3" :rem 189 
RETURN :rem 175 
GOSUB2000:PRINT£1," ЕЗ +J 


3081 


3082 


3083 


3084 


3085 


3090 


3091 


3092 


3093 


3094 


3095 


3100 


3101 


3102 


3103 


3104 


3105 
3110 


Зиа! 


3112 


3113 


3114 


3115 


3120 


3121 


3122 


3123 


3124 


(2 SPACES]E+3[3 ЅРАСЕЅ} Я 

(2 5РАСЕ5 3-4" :rem 200 
GOSUB2000:PRINT#1,"E+3[3 SPACES) 

E+3 £+3{3 SPACES]E+3 +] 

(4 SPACES)" :rem 215 
GOSUB20900:PRINT£41,"K-3(3 SPACES} 

E+3 E+3[3 SPACES]E+3 E+3 

(2 SPACES]E2 +3" :rem 36 
GOSUB2000:PRINT£&1,"K5 +3 E+3 
(3 SPACES]E+3 £+3{3 ЅРАСЕЅ}Е+Я 
р ігеп 113 
GOSUB2000:PRINT£$1,"K-3(3 SPACES} 
E+3(2 5РАСЕ5)ЕЗ +3[3 SPACES} 

ЕЗ +] " :rem 204 
RETURN :rem 176 
GOSUB20090:PRINT#1," K4 «3 E5 +J 
[SPACE]E4 +3 " :rem 7 
GOSUB2000:PRINT#1,"E+3[5 SPACES) 
E+3(5 SPACES]E+3[3 SPACES]E+3" 


:rem 50 
GOSUB2000:PRINT#1," ЕЗ +J 
[2 SPACES}£4 +3[2 SPACES]E4 +3 " 

ігеп 189 
GOSUB2000:PRINT#1,"Í4 SPACES]E+3 
k+3{5 SPACES}£+3{4 SPACES)" 

:rem 142 
GOSUB290@: PRINT#1,"K4 +3[2 SPACES} 
Е5 +] E*3(4 SPACES]" :rem 25 
RETURN :rem 177 
GOSUB2098:PRINT#1," ЕЗ +3 
(3 SPACES}£3 +3[2 SPACES}£5 +3" 

ігеп 179 
GOSUB2000:PRINT#1,"E+3[3 SPACES} 
E+3 E+3[3 SPACES]E+3[3 SPACES) 
E+3í2 SPACES}" :rem 208 
СО50В2000:РВІМТФ1,"Ё+9{3 SPACES} 
Ені E*3(7 SPACES]E+3[2 SPACES} 
:rem 43 
GOSUB2000:PRINT#1,"E+3[3 SPACES) 
E+3 E+3[3 SPACES]E+3[3 SPACES} 
k+3{2 SPACES}" :rem 210 
GOSUB2009:PRINT£1," ЕЗ +9 
{3 SPACES}K3 +3{4 SPACES} £+] 
{2 SPACES}" :rem 31 
RETURN ігеп 169 
GOSUB200@:PRINT#1,"E+3[3 SPACES} 
E+3[2 5РАСЕ5)ЕЗ +3{2 SPACES} 
E+3[í3 SPACES]E+3" :rem 28 
GOSUB2000:PRINT£41,"K2 +3{2 SPACES) 
E+3 E-3(3 SPACES)E43 K+ 


(3 5РАСЕ5)Е 43" :rem 29 

GOSUB2000:PRINT#1,"E+3j E+3 ЕН 
Ё+7{3 SPACES]E+3 E+3 

{3 SPACES]E+3" :rem 30 


GOSUB200@0:PRINT#1,"E+3[2 SPACES} 

Е2 +3 £+3{3 SPACES]E+3 

{2 ЅРАСЕЅ}Е+Я E+3 " :rem 31 

GOSUB2000:PRINT#1,"E+3[3 SPACES} 

K*3(2 5РАСЕ5)ЕЗ +3{4 SPACES) 

E+3[2 SPACES}" :rem 122 

RETURN :rem 170 

GOSUB2000:PRINT£&1,"K4 +3[2 SPACES} 

Е5 +3[2 SPACES)E3 +3 " :rem 91 

GOSUB2000:PRINT£41,"K43(3 SPACES] 

E*3 £+3{5 SPACES]E+3[3 SPACES) 

Ее" :rem 210 

GOSUB2000:PRINT#1,"E+3[3 SPACES} 

E+3 £4 +912 5РАСЕ5)Е 3 

(4 SPACES}" :rem 31 

GOSUB2000:PRINT#1,"E+3[3 SPACES} 

E+3 E+3[5 SPACES}£+3{3 SPACES} 

E+3" :гет 212 

GOSUB2ØØØ:PRINT#1l, "K4 +3[2 SPACES} 
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3125 
3200 


3210 
3211 
3212 
3213 
3214 


3215 
3314 


3315 
3414 


3415 
3514 


3515 
3614 


3615 


4000 


4020 


4030 


4035 


4060 
4080 
4085 


4110 
4130 


4999 
5000 
5001 
60002 
6010 


6020 
7000 


7010 


7020 
8000 


8010 


8020 
9000 


E5 +3{2 5РАСЕ5) 63 +] " :rem 95 
RETURN :rem 171 
І1-ІМТ(Ү/1000):71-Ү-І1%1000:12-ІМТ(7 
1/100):22-71-12%100:ІЗ-ІМмТ(72/10) 


zrem 83 
І4=72-13*10 :rem 48 
IFI2-OTHENI2-10 :rem 134 
IFI3-OTHENI3-10 :rem 137 
IFIA4-ÜTHENI4-10 :rem 140 


GOSUB2000:X-I1:GOSUB6000:GOSUB20900 :X 
=1 2 : GOSUB699D : GOSUB29GG : X=13 : GOSUB6D 
00 :rem 98 
GOSUB2000:X-14:FL-1:GOSUB6000:rem 19 
Сс050В2000:Х-11:6050В7000:с050в2000:Х 
=12:GOSUB799@ : GOSUB2ØØØ : X=13 : GOSUB79 
00 :гет 102 
GOSUB2000:X=I4:FL=1:GOSUB7000:rem 21 
С050В2000:Х-11:С050вВ8000:с050в2000:Х 
=I2:GOSUB8000:GOSUB2000:X=I3:GOSUB80 
00 :rem 106 
GOSUB2000:X=I4:FL=1:GOSUB8000:rem 23 
GOSUB2ØØØ :X=I1 : GOSUB9ØØØ : GOSUB2ØØØ :X 
=I 2 : GOSUB9ØØØ : GOSUB2ØØØ : X=13 :GOSUB9Ø 
00 :rem 110 
GOSUB2000:X=I4:FL=1:GOSUB9000:rem 25 
С050В2000:Х-11:Сс050В10000:6050в2000: 
X=I2:GOSUB100@0:GOSUB20@00:X=I3 

:rem 69 
GOSUB10000:GOSUB2000:X=14:FL=1:GOSUB 
10000: RETURN :rem 7 
PRINT"[CLR][DOWN][2 SPACES]THIS IS A 
PROGRAM":PRINT"{5 RIGHT}TO PRINT A" 

:rem 115 
PRINT."{2 SPACES}{PUR}MONTHLY CALENDA 
R{BLU}":PRINT"{3 RIGHT}ON THE PRINTE 
R" :rem 187 
PRINT" {DOWN}{2 RIGHT}PLEASE TYPE IN 
{SPACE}THE":PRINT"{3 RIGHT}{RED}MONT 
H{BLU} AND {RED}YEAR{BLU}"  :rem 185 
PRINT" THAT YOU WISH TO SEE":PRINT" 
{2 SPACES}(EXAMPLE: {RED}12,1983 
{BLU}) {PUR} ( DOWN] " : PRINTTAB(5); 


:rem 211 
INPUTMO,Y :rem 92 
PRINT"{2 DOWN}{2 SPACES}{BLU}THANK Y 
QU! NOW--":PRINT" PLEASE {PUR}TURN O 
N{BLU} THE" :rem 7 


PRINT"PRINTER AND THEN TYPE":PRINTTA 
B(8)"{PUR}OK{DOWN}":INPUTRS$ :rem 252 
IFRS <> "ОК"ТНЕМ4080 :гет 30 
PRINT"ÍBLU]PRINTINGÍDOWN]":FORI=1TO8 


00 : NEXT : RETURN :rem 218 
PRINT#1,CHR$(15)" " :гет 232 
GOSUB1620 :rem 14 
CLOSE1:END ігеп 126 
ОМХС0О50В2011,2021,2031,2041,2051,206 
1,2071,2081,2091,2001 :rem 146 
IFFL<>1THENPRINT#1," ";:RETURN 

:rem 104 
PRINT#1,"":FL=0:RETURN :rem 108 


ONXGOSUB2012,2022,2032,2042,2052,206 


2,2072,2082,2092,2002 :rem 157 
IFFL<>1THENPRINT#1," ";:RETURN 

:rem 105 
PRINT#1,"":FL=0:RETURN :rem 109 


ONXGOSUB2013,2023,2033,2043,2053,206 


3,2073,2083,2093,2003 :rem 168 
IFFL<>1THENPRINT#1," ";:RETURN 

:rem 106 
PRINT£1,"":FL-0:RETURN :rem 110 


ONXGOSUB2014,2024,2034,2044,2054,206 
4,2074,2084,2094,2004 ігеп 179 
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9010 IFFL<>1THENPRINT#1," ";:RETURN 


9020 PRINT#1,"":FL=@: RETURN 
10000 


10010 


10020 
11000 


11010 


11020 


11030 
12000 


12010 


12220 


12030 
13000 


13010 


13020 


13030 
14000 


14010 


14020 


14030 
15000 


15010 
15020 


15030 


:rem 107 
:rem 111 
ONXGOSUB2015,2025,2035,2045,2055,20 
65,2075,2085,2095,2005 :геп 229 
IFFL<>1THENPRINT#1," ";:RETURN 

:rem 147 
PRINT41,"":FL-Ü:RETURN :rem 151 
ONXGOSUB2099,2111,2021,2031:PRINT£41 
nuc :rem 195 
ОМХ1с050вВ2000,2001,2011,2021,2031,2 
041,2051,2061,2071,2081,2091 

:rem 222 
IFFL<>1THENPRINT#1,"{2 SPACES]";:RE 
TURN :rem 149 
FL-0:PRINT41,"":RETURN :rem 153 
ONXGOSUB29090,2112,2022,2032:PRINT£1 
V NT :rem 199 
ONX1GOSUB29000,2002,2012,2022,2032,2 
042,2052,2062,2072,2082,2092 

:rem 233 
IFFL«»ITHENPRINT£1,"(Í2 SPACES}";:RE 
TURN :rem 150 
FL=9: PRINT#1,"":RETURN :rem 154 
ONXGOSUB29@9@ , 2113, 2023, 2033: PRINT#1 
pale :rem 203 
ONX1GOSUB208@ , 2003, 2013, 2023, 2033,2 
943, 2053, 2863, 2073, 2083, 2893 

:геп 244 
IFFL<>1THENPRINT#1,"{2 SPACES]";:RE 
TURN :rem 151 
FL=0:PRINT#1,"";RETURN :rem 155 
ONXGOSUB2000,2114,2024,2034:PRINT#1 
acne, :rem 207 
ОМХ1С050вВ2000,2004,2014,2024,2034,2 
044,2054,2064,2074,2084,2094 

:rem 255 
IFFL<>1THENPRINT#1,"{2 SPACES]";:RE 
TURN :rem 152 
FL=9: PRINT#1,"": RETURN :rem 156 
ONXGOSUB29@@, 2115, 2825, 2035: PRINT#1 
28806 :rem 211 
ОМХ1Сс05/В2000,2005,2015,2025,2035,2 
045,2055,2065,2075,2085,2095:геп 10 
IFFL<>1THENPRINT#1,"{2 SPACES]";:RE 
TURN :rem 153 
FL=@:PRINT#1, "":RETURN :rem 157 


Program 3: 
Monthly Appointment Calendar For 
Printer 


88 DIMM$(12),W$(7):FORI-1TO12:READM$(I):N 
EXTI:FORI-1TO7:READW$(I):NEXTI:rem 118 
90 5Ү565517:А=РЕЕК (781) :ІРА=40ТНЕМРОКЕ532 


81,1 


100 


105 


110 


111 


120 
130 


:rem 167 
PRINT"(CLR)ÍDOWN)Í2 SPACES]THIS IS А 
[SPACE]PROGRAM":PRINT"[6 RIGHT]TO 5НО 
W A" :rem 17 
PRINT"{2 RIGHT}{PUR}MONTHLY CALENDAR 
{BLU}":PRINT"{3 RIGHT}ON THE PRINTER 
{DOWN}" :rem 214 
PRINT" {RIGHT}PLEASE TYPE ІМ THE":PRIN 
т"{3 RIGHT}{RED}MONTH{BLU} AND [RED]Y 
EAR{BLU}" :rem 86 
PRINT"THAT YOU WISH TO SEE":PRINT" 
{RIGHT}(EXAMPLE: {RED}12,1983{BLU}) 
{PUR}{2 DOWN]" :rem 105 
PRINTTAB(5);:INPUTM0,Y :гет 132 
PRINT"{2 DOWN][2 SPACES}{BLU}THANK YO 
Ul NOW--":PRINT" PLEASE {PUR}TURN ON 
{BLU} THE" :rem 207 


131 


151 
154 


202 


210 
213 
214 


215 
217 
219 


220 
1000 
1050 


1060 
1080 
1100 


1150 
1200 
1210 
1230 


1240 


1244 
1245 


1247 


1249 


1250 
1292 


1293 


1294 


1295 


1296 
1400 


1405 
1410 
1600 


1605 


1610 
17004 
1702 
1704 
1706 
1707 
1709 
171 
1713 
1715 
ША 
1719; 
1721 
1723 
1725 


PRINT"PRINTER AND THEN TYPE":PRINTTAB 
(9) " (PURJOK(DOWN] " : INPUTRS :rem 193 
IFR$«»"OK"THEN130 :rem 183 
PRINT"(BLU)PRINTING(DOWN]":FORI-1TOB80 
ÜO:NEXTs:GOSUB1292:0PEN1,4 :rem 23 
PRINT#1,CHR$(14)"{3 SPACES]";M$(M2);" 
":Y:GOSUB1600:GOSUBl709:FORD-1TOEl:J 


l=J1+1 :rem 225 
GOSUB1Ø5Ø:IFD<1ØTHENG$=" " :гет 158 
IFD>=1@THENG$="" :rem 96 


IFD1=1THENPRINT#1,CHRS$(15)"{3 SPACES} 
"WS (D1) ;CHR$(14)G$;"{RVS}"D"{OFF}";CH 


ЕЕ Tobira) ae :rem 71 
IFD1=1THENGOSUB1699 :rem 128 
IFD1=1THENGOTO229 ігеп 8 


PRINT#1,CHR$(15)"{3 SPACES]"W$(D1);CH 
R$(14)G$;D;CHR$(15)"(";J1;")":GOSUB16 


00 :rem @ 
NEXTD :rem 23 
CLOSE1:END :rem 121 
IFMO-ITHENME-13:Y-Y-1:GOTO1080 
:rem 80 
ІЕМ0=2ТНЕММ0=14:Ү=Ү-1 :rem 23 
М-М0-2 :rem 47 
р1=ІМТ(2.6*М-9.2)+0+Ү-1900+ІМТ((Ү-19 
00) /4) :rem 207 
D1=D1+INT(19/4)-2*19 :rem 21 
D1=D1-INT(D1/7)*7+1 :rem 235 
IFM@=40RM9=9THEND1=D1+1 :rem 135 
IFM9=13THENM@=1 : Y=Y+1:GOTO1245 
:rem 81 
IFM9=14THENM@=2 : Y=Y+1:D1=D1+1 
:rem 210 
IFD1=8THEND1=1 :rem 86 


IF (Y=2199ANDMG>=3 )OR(Y>2199) THEND1=D 
1-1: IFD1=@THEND1=7 :rem 198 
IF (Y=220GANDM@>=3 )OR(Y>220@)THEND1=D 
1-1: IFD1=8THEND1=7 :rem 202 
IF (Y=239GANDM9>=3 )OR(Y>2309) THEND1=D 
1-1:IFD1=@THEND1=7 :rem 206 
RETURN :rem 168 
IFM9=10RM9=30RM9=5ORMG=70ORMG=80RMG=1 
SORMO=1 2THENE1=31 :rem 75 


ІЕМО=408М0=608М0=908М0=11ТНЕМЕ1=30 
ігеп 115 
IFMØ=2ANDY/4<> INT (Y/4)THENEl=28 
:rem 152 
IFM@=2ANDY/4=INT(Y/4)THENGOSUB1400 
:rem 132 
RETURN :rem 178 


IF(Y/190-INT(Y/109))AND(Y/A490«» INT(Y 
/490) )ТНЕМЕ1-28:С0Т01410 :rem 231 
Е1-29 :rem 232 
RETURN :rem 166 
FORI-1TO20:PRINT£$1,CHR$(15)" ";:NEXT 
I :rem 170 
FORK-1TO18:PRINT$1,".";" ";" ";:МЕХТ 
K:PRINT#1,"." :rem 231 
RETURN :rem 168 
IFM9=1THENJ1=0 :rem 89 
IFMO=2THENJ1=31 :rem 144 
IFMO-3THENJ1-59 :rem 157 
ІЕМӢ=4ТНЕМЈ1=90 :rem 155 
ІЕМ@=5ТНЕМЈ1=120 :rem 199 
IFM9=6THENJ1=151 :rem 206 
IFM@=7THENJ1=181 :rem 203 
ІЕМй-8ТНЕМ71-212 :rem 201 
ІЕМӢ=9ТНЕМЈ1=243 :rem 208 
IFM@=19THENJ1=273 srem 253 
IFMÜ-llTHENJ1-3904 :rem 251 
IFM@=12THENJ1=334 :rem 248 


IFY/4<>INT(Y/4)THENGOTO173@ :rem 189 
IF(Y/100=INT(Y/100))AND(Y/400<>INT(Y 


/400))THENGOTO1730 :rem 159 
IF (Y/4=INT(Y/4) ) AND (M@>=3 ) THENJ1=31+ 
al :rem 175 
RETURN ігеп 171 
DATA "(2 SPACES}JANUARY"," FEBRUARY" 
‚"{4 SPACES }MARCH","{4 SPACES]APRIL" 
,"Í6 5РАСЕ5)МАҮ" :rem 36 
DATA "(5 SPACES}JUNE","{5 SPACES]JUL 
y","{3 SPACES]AUGUST" , "SEPTEMBER", " 
{2 SPACES }OCTOBER" :rem 229 
DATA " NOVEMBER"," DECEMBER" :rem 39 
DATA "(4 SPACES}{RVS}SUNDAY{OFF}"," 
[4 SPACES}MONDAY","{3 SPACES)TUESDAY 
"," WEDNESDAY","{2 SPACES }THURSDAY" 

2 :rem 90 
DATA "(4 SPACES}FRIDAY","{2 SPACES}S 
ATURDAY" zrem 192 


Program 4: 
Yearly Calendar For Printer 
3 SYS65517:A=PEEK(781):IFA=40THENPOKE5328 


1727 
1730 
2000 


2010 


2020 
2030 


2040 


1,1 тет 113 
5 ОРЕМ1,4:рІМИ4 (3) :С050В1510:1=1:7=2 
:rem 128 


7 PRINT#1,CHR$(14)SPC(13)"HAPPY NEW YEAR 
{SPACE}";Y:PRINT#1 :rem 38 
PRINT£1,CHR$(14)SPC(8)"JANUARY"SPC(13) 
"FEBRUARY" :rem 49 
GOSUB1009:GOSUB1000:GOSUB1012 :CØ=6 :GOS 
UB1019:GOSUB1000:GOSUB1022 ігеп 69 


10 


1% 


15 M@=I:M8=1:GOSUB292:GOSUB29:GOTO35 
:rem 228 
20 D=1:GOSUB1959:W2=8-D1 : W4 (M8 )=wW2+1:GOSU 
B321 :rem 123 
22 IFD1-7THENGOTO30 :rem 167 
25 FORD-2TOW2:GOSUB1950:GOSUB331:NEXTD 
:rem 187 
30 RETURN :rem 67 
35 GOSUB990:M0-J:M8-2:GOSUB292:GOSUB20 
:rem 105 
44 W3-1 :rem 96 
45 MÓ-I:M8-1:GOSUB292:GOSUB206 :rem 66 
46 IFW4(2)=9THENPRINT#1,CHR$(15)SPC(1); 
:rem 20 
50 GOSUB991 :M@=J :M8-2:GOSUB292:GOSUB2060 
:rem 151 
56 IFW3-lANDWA4(1)»9THENPRINT£1,CHR$(15)SP 
с(0); :гет 223 
57 IFW3=1lANDW4(1)<1@THENPRINT#1,CHR$(15)S 
PC(1); :rem 7 
58 IFW3=4ANDW4(2)>3@THENPRINT#1,CHR$(15)S 
PC(0); :гет 15 
65 W3=W3+1 :rem 24 
70 IFW3«COTHENGOTO45 :rem б 
71 PRINT#1," " :rem 185 
72 IFI-lTHENGOTOB86 :rem 133 
73 IFI-3THENGOTO96 :rem 137 
74 IFI-5THENGOTO106 :rem 180 
75 IFI-7THENGOTO116 :rem 184 
76 IFI=9THENGOTO126 :rem 188 
77 IFI=11THENGOTO199 :rem 240 
86 PRINT#1,CHR$(14)SPC(9)"MARCH"SPC(16)"A 
PRIL" :rem 171 
88 I=3:J=4:GOTO12 :rem 244 
96 PRINT£1,CHR$(14)SPC(12)"MAY"SPC(17)"JU 
NE" :rem 11 
98 I=5:J=6:GOTO12 :rem 249 
106 PRINT£1,CHR$(14)SPC(9)"JULY"SPC(16)"A 
UGUST" :rem 14 
108 I=7:J=8:GOTO12 :rem 37 


116 PRINT£1,CHR$(14)SPC(7)"SEPTEMBER"SPC( 
13)"OCTOBER" :rem 162 
118 I=9:J=10:GOTO12 :rem 81 
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126 


128 
199 


200 
205 
210 
212 
213 
214 
215 


216 
217 


220 
225 
292 
293 
294 
295 


296 
321 


322 
323 
324 
325 
326 
8270 
328 
329 
330 
331 
332 
333 
335 
336 
350 
428 


429 
430 


431 
433 
435 
528 


529 
530 


531 
532 


533 
585 


PRINT#1,CHR$(14)SPC(7)"NOVEMBER"SPC(1 
3) "DECEMBER" :rem 131 
I=11:J=12:GOTO12 :rem 125 
PRINT£41,CHR$(15)SPC(1):CLOSEl1:END 


:rem 194 
D4=W4 (M8) :D7=W4 (M8) +6 :геп 92 
D=D4:GOSUB1050 :rem 16 
IFD1<>1THENPRINT"WHY Dl=";D1 :геп 156 


IFM8=1AND(D+1)<1@THENGOSUB528:rem 198 
IFM8=1AND(D+1)>9THENGOSUB53@ :rem 154 
IFM8=2AND(D+1)<1@THENGOSUB428:rem 200 
IFM8-2ANDD4»-—30ANDD4«-ElTHENGOSUB433: 
GOTO217 :rem 212 
IFM8-2AND(D-*1)»9THENGOSUB430 :rem 157 
FORD=D4+1TOD7 : GOSUB1 958 : GOSUB331:NEXT 


D :rem 139 
W4 (M8 )=D7+1 :rem 9 
RETURN :rem 121 


IFMZ-lORMO-3ORM9-50RMÉÜ-70RMO-B8ORMZ-10 
ORMZ-12THENE1-31 :rem 26 
IFM9=40RMG=6ORMS=90RMG=11 THENE1=39 

:rem 66 
IFM2-2ANDY/4«»INT(Y/A4)THENE1-28 

:rem 103 
IPMO-2ANDY/A4-INT(Y/4)THENGOSUB1408 

:rem 83 
RETURN :rem 129 
IFD1=7THENPRINT#1,CHRS$(15)SPC(36);D;: 
GOTO330 :rem 101 
IFD1=6THENPRINT#1,CHRS$(15)SPC(31);D;: 
GOTO330 zrem 96 
IFD1=5THENPRINT#1,CHRS$(15)SPC(26);D;: 
GOTO330 :rem 100 
IFD1=4THENPRINT#1,CHR$(15)SPC(21);D;: 
сотозз@ :rem 95 
IPD1=3THENPRINT#1,CHR$(15)SPC(16);D;: 
GOTO330 :rem 99 
IFD1=2THENPRINT#1,CHR$(15)SPC(11);D;: 
GOTO330 :rem 94 
IFD1=1THENPRINT#1,CHR$(15)SPC(6);D;:G 


070330 :rem 50 
PRINT#1,CHR$(15)SPC(3);D; :GOTO330 
:rem 143 
PRINT#1,CHR$(15)SPC(2);D; :rem 134 
RETURN :rem 118 
IFD>E1THENPRINT#1,CHR$(15)SPC(5);:GOT 
0350 :rem 196 
IFD1=1ANDD<=9THENPRINT#1, D; :GOTO359 
:rem 153 
IFD1=1ANDD>9THENPRINT#1,D; :GOTO35@ 
:rem 95 
IFD<=9THENPRINT#1,CHR$(15)SPC(2);D;:G 
OTO359 :rem 66 
PRINT#1,CHR$(15)SPC(1);D; :rem 131 
RETURN :rem 120 
IFD>E1THENPRINT#1,CHR$(15)SPC(9);:GOT 
0435 гет 211 
GOTO328 :гет 117 
IFD>E1THENPRINT#1,CHR$(15)SPC(9);:GOT 
0435 :rem 204 
GOTO329 ігеп 111 
PRINT#1,CHR$(15)SPC(1);D; :rem 129 
RETURN :rem 124 
IFD>E1THENPRINT#1,CHR$(15)SPC(9);:GOT 
0535 :rem 213 
GOTO532 :rem 115 
IFD>E1THENPRINT#1,CHR$(15)SPC(9);:GOT 
0535 :rem 206 
GOTO533 :rem 109 
PRINT#1,CHR$(15)SPC(5);D;:GOTO535 
:rem 149 
PRINT#1,CHR$(15)SPC(4);D; :rem 133 
RETURN :rem 125 
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990 PRINT£1,CHR$(15)SPC(3);:GOTO992 


ігеп 35 
991 PRINT#1,CHR$(15)SPC(6); :rem 16 
992 RETURN :rem 132 
1000 PRINT£1,CHR$(15)SPC(7); :rem 47 
1001 RETURN :rem 162 
1009 PRINT£1,CHR$(15)SPC(3); :rem 52 


1010 PRINT#1,"{4 SPACES}S{4 SPACES}M 

{4 SPACES}T{4 SPACES}w{4 SPACES}T 

{4 SPACES}F{4 5РАСЕ5)5"; :rem 134 
1011 RETURN :rem 163 
1012 PRINT#1,"{4 SPACES}S{4 SPACES}M 

{4 SPACES}T{4 SPACES}w{4 SPACES}T 


{4 SPACES}F{4 SPACES}s" :rem 77 
1913 RETURN :rem 165 
1019 PRINT#1,CHRS$(15)SPC(3); trem 53 


1020 PRINT#1,"{4 5РАСЕ5)ЕТЯ(4 SPACES} 

kKT3Í4 5РАСЕ5)ЕТЯ(4 5РАСЕ5)ЕТЯ 

(4 5РАСЕ5)ЕТЯ(4 SPACES]ET3 

{4 sPACES)ET3"; :гет 196 
1021 RETURN :rem 164 
1022 PRINT#1,"{4 ЅРАСЕЅ}ЕТЯ{4 SPACES) 

ET3[4 SPACES]ET3[4 5РАСЕ5)ЕТЯ 

(4 5РАСЕ5}КТЯ{4 SPACES]ET3 

{4 SPACES]ET3" :rem 139 
1023 RETURN ігет 166 
1050 IFMÜ-ITHENMZ-13:Y-Y-1:GOTO1988 


:rem 80 

1060 ТЕМ@=2ТНЕММ@=14:Ү=Ү-1 :rem 23 
1080 M-M9-2 :rem 47 
1100 р1=ІМТ(2.6*М-0.2)+р+Ү-1900+ІМТ((Ү-19 
00)/4) :rem 207 

1150 D1=D1+INT(19/4)-2*19 :rem 21 
1200 D1=D1-INT(D1/7)*7+1 ігеп 235 
1210 IFM@=40RM9=9THEND1=D1+1 :rem 135 


1230 ІЕМйЙ-13ТНЕММй-1:Ү-Ү-1:50Т01250 


:rem 77 
1240 IFMØ=14THENMØ=2:Y=Y+1:Dl=D1+1 

:rem 210 
1244 IFD1=8THEND1=1 ігеп 86 


1245 IF(Y=21@@ANDM0>3)OR(Y>2100)THEND1=D1 
-1:IFD1=@THEND1=7 :rem 137 
1247 IF(Y=220@ANDM0>3)OR(Y>2200)THEND1l=D1 
-1: IF CPERVSJSOTHEND1=7 :rem 53 
1249 IF(Y-2300ANDM2»3)OR(Y»23900) THEND1-D1 
-1:IFD1=@THEND1=7 :rem 145 
1250 RETURN :rem 168 
1400 IF(Y/198=INT(Y/19@) )AND(Y/499<>INT(Y 


/4®@) ) THENE1=28:GOTO1419 :rem 231 
1405 Е1-29 :rem 232 
1410 RETURN :rem 166 


1510 PRINT"ÍCLR)ÍDOWN)(2 RIGHT}THIS IS А 
{SPACE}PROGRAM":PRINT"{6 RIGHT}TO SH 
OW A" :rem 129 
1520 PRINT"{3 RIGHT}{PUR}YEARLY CALENDAR 
{BLU}":PRINT"{3 RIGHT}ON THE PRINTER 
{Down }" :гет 208 
1530 PRINT"ÍRIGHT]PLEASE TYPE IN THE":PRI 
NT"{3 RIGHT]YEAR THAT YOU":PRINT" 
*(4 RIGHT}WISH TO SEE" :rem 38 
1535 PRINT"(3 RIGHT}(EXAMPLE: {PUR}1984 
{BLU}){2 DOWN])":PRINTTAB(6);:INPUTY 
:rem 195 
1570 PRINT"(DOWN)(Í3 RIGHT}THANK YOU! NOW- 
-":PRINT"{RIGHT}PLEASE TURN ON THE" 
:rem 145 
1573 PRINT"PRINTER AND THEN TYPE" :геп 9 
1575 PRINTTAB(8)"(PURJOK(BLU) [DOWN] " 


:rem 105 
1588 INPUTRS :rem 212 
1585 IFRS$<>"OK"THEN1579 ігеп 44 


1590 PRINT"PRINTINGÍDOWN]":FORI=1TO800:NE 
XT:RETURN :rem 194 


Bingo 64 


(Ar 


150 
1668 


170 
180 
190 
200 
210 
220 
230 
240 


256 
260 


270 
280 
290 
302 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 


410 
420 


430 
440 
450 


460 


ticle on page 54.) 


BEFORE TYPING... 


Before typing in programs, please refer to "How 
To Type COMPUTE''s Gazette Programs," “А 


Beginner's Guide To Typing In Programs," and 
“The Automatic Proofreader" that appear before 
the Program Listings. 


POKE53281,1:POKE 53280,1 :rem 237 
$8-54272:V-53248:D0-56323:D1-56320:D2 
-56321:РОКЕ у+21,@ :rem 194 
PRINT CHR$(147),CHR$(17),CHR$(17) 
:rem 223 
PRINTSPC(14); CHR$(18);CHR$(31); "MODES 
ОЕ PLAY":PRINT :rem 50 
PRINTSPC(14);CHR$(28); "+ dde e xn 
:PRINT :rem 34 
PRINTSPC(4) ;CHR$(144);"1- AUTO BALL F 
EED{3 SPACES}- AUTO COVER" :rem 218 
PRINTSPC(4);"2- MANUAL BALL FEED - AU 
TO COVER" zrem 59 


PRINTSPC(4);"3- MANUAL BALL FEED - MA 
NUAL COVER" :rem 194 
PRINTSPC(4);"4- AUTO BALL FEED 

(3 SPACES]- MANUAL COVER" :rem 63 


PRINT:PRINT"(Í5 SPACES}ENTER MODE SELE 
CTED:" :rem 84 
GET AS:IF AS=""THEN 250 :rem 81 
AU-VAL(A$)-1:1F А0<0 OR AU>3 THEN 170 
:rem 156 
М15-"-СНІМЕ RINGS FOR NUMBER ОМ CARD" 
:rem 57 
M2$="-GONG RINGS FOR NUMBER ON NO CAR 
DE :rem 157 
М35-"-НІТ ANY KEY FOR BALL FEED" 
:rem 185 
M4S="-USE JOYSTICK (PORT 2)-FIRE TO C 
OVER" :rem 128 
PRINTCHR$(147),CHR$(17),CHR$(17) 
:rem 219 
PRINT SPC(2);M1$:PRINT SPC(2);M2$ 
:rem 118 
IF AU=1 OR AU-2 THEN PRINT SPC(2);M3$ 
:rem 211 
IF AU-2 OR AU-3 THEN PRINT SPC(2);M4$ 
:rem 215 
PRINT:PRINT SPC(19);"HIT ANY KEY TO S 
TART" :rem 234 
GET A$:1F A$=""THEN 360 :rem 85 
PRINT CHR$(147) :rem 21 


REM*** READ THE ML CODE TO SET A BLOC 
K OF MEMORY *** :rem 213 


FOR I=@TO11:READ Х%:РОКЕ 28672+1,X%:N 
EXTI :rem 98 
REM*** SET THE COLOR MEMORY TO BLACK 
{SPACE }*** :rem 153 
FOR I=6TO3:HB=216+1 :rem 22 


POKE 251,0:РОКЕ252,НВ:РОКЕ253,0:РОКЕ2 
54,0:SYS 28672:МЕХТ :rem 235 
DIM. SD(4,62),CO(5),X(5),¥(5),FL(21),F 
H(21),DU(21),C(3,4,4),N(4,14) :rem 22 
CO(0)298:CO(1)-214:C0(2)-24:CO(3)22:CO(4 
)-7:С0(5)-й :rem 11 


L(@)=130@:L(1)=137:L(2)=142:L(3)=135:L 
(4)=143 :rem 180 
5(й)-1104:5(1)-1127:5(2)-1624:5(3)-16 
47 :rem 194 


470 
480 
490 
500 
510 
520 


530 


540 


550 


560 


570 


580 
590 


600 
619 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 


740 
750 


760 
770 
780 
790 


800 
810 
820 
830 
840 
850 


860 


Е(0)=1271+55:Е(1)=1294+55:Е(2)=1791+5 
5:Е(3)=1814+55 :rem 222 


GOSUB 640:REM*** МАКЕ THE ВОХ *** 
:rem 184 
GOSUB 1470:КЕМ%%% MAKE BINGO SPRITES 
[SPACE] *** :rem 186 
REM*** BLANK OUT THE FREE-BOXES *** 
:rem 134 
FORI=@TO3:POKE F(I),1:POKEF(I)+1,1:NE 
xT :rem 42 


GOSUB 840:REM*** CHOOSE THE NUMBERS F 
OR THE CARDS *** :rem 192 
REM*** PUT RED COVER-TOKEN ON FREE-BO 
ХЕЛ КЕ :гет 230 
FOR I=@0@TJTO3:POKEF(I)-SS,160@:POKEF(I)+1 
-SS,16@:POKEF(1),8:POKEF(I)+1,8:NEXT 
:rem 85 
FORCD-0TO3:C(CD,2,2)-0:NEXT:REM SET С 
ENTER BOX TO ILLEGAL VALUE (FREE BOX) 
:rem 108 
REM*** DRAW THE PASS LINE ***:rem 233 


FORLI=9T06: POKE(1528+L1),64:NEXT LI 
:rem 68 
REM*** START OF PLAY *** :rem 214 


GOSUB l1100:REM*** GET THE NEXT NUMBER 
kkk :rem 195 
GOSUB 1170:REM*** CHECK THE CARDS FOR 
A MATCH *** :rem 58 
IF AU-Ü OR AU-3 THEN 590:REM*** CHECK 


FOR AUTO BALL-FEED *** :rem 145 
GET А5:ІЕ А5-""ТНЕМ 620 :REM*** WAIT 
(5РАСЕ)ҒОВ NEXT BALL *** :rem 227 
GOTO 590 zrem 112 
REM *** BOX MAKER *** :rem 211 
TO$-" B{2 SPACES]I(2 SPACES}N 
(2 SPACES}G{SHIFT-SPACE} O " :rem 211 
A1-176:A2-96:A3-178:A4-174:GOSUB710:T 
1$=А$ :rem 44 
A1-98:A2-32:A3-98:A4-98:GOSUB710:T2$- 
AS :rem 157 
Al-171:A2-96:A3-123:A4-179:GOSUB7190;T 
35-А5 :rem 38 
Al1-173:A2-296:A3-177:A4-189:GOSUB719:T 
4S=AS srem 52 
GOTO7598 :rem 108 


AS=CHRS$ (A2)+CHR$(A3)+CHR$(A2):rem 224 


AS=CHRS (А1) +CHR$ (A2)+AS+AS+AS+AS+CHRS 
(A2)+CHRS (A4) :rem 17 
AS=AS+"{7 SPACES}"+AS :rem 160 
RETURN zrem 123 


PRINT CHR$(18)CHR$(31)TOSCHRS$(146)SPC 
(8) CHRS$ (18) CHR$(31)TOSCHRS (146) 

rem 

PRINT СНЕ5(144);Т15 :rem 

FOR I=1T04:PRINTT2$:PRINTT3S :NEXT 

:rem 111 

ігеп 16 


164 
249 


PRINTT2$:PRINTT4$: PRINT 


PRINT CHR$(18)CHR$(31)TOS$CHR$(146)SPC 
(8)CHRS (18)CHRS$(31)T@SCHRS$(146) 
:rem 168 
PRINT CHR$(144);T1$ :rem 244 
FOR I-1TO4:PRINTT2$:PRINTT3$:NEXT 
:rem 106 
PRINTT2$:PRINTT4S; :rem 127 
RETURN 2геш 123 
REM*** CHOOSE THE CARD NUMBERS *** 
:rem 84 
REM*** FIRST ZERO THE CALLED NUMBER А 
RRAY *** ігеп 19 


FOR CL=@TO4:FORNN=@TO14:N(CL,NN)=0:NE 
XT:NEXT гет 25 
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870 
880 
890 
900 


910 
920 


930 
940 


950 
960 
970 


980 

990 

1000 
1010 
1020 
1030 
1040 
1050 


1060 
1070 
1080 
1090 


1100 


1110 
1120 


1130 


1140 


1150 
1160 
1170 


1186 
1196 
1200 


1210 
1220 


1230 
1240 
1250 


1260 


1270 
1280 
1290 


1300 


1310 
1320 
1330 
1340 
1350 
1360 


Ср=0{2 SPACES}:REM*** CARD LOOP *** 
ігеп 1 
CL-0(2 SPACES}:REM*** COLUMN LOOP *** 
:rem 190 
FOR I=@T04:C(CD,CL,1)=@:NEXT: REM*** 2 
ERO COL OF NUMBERS ON CARD ***:rem 32 
RN=0[2 SPACES}:REM*** ROW LOOP *** 
:rem 242 
Z=INT(RND(Q)*15)+1+15*CL :rem 8 
REM*** TEST FOR THE NUMBER IN USE *** 


:rem 288 
J=6 :rem 83 
IF C(CD,CL,J)=Z THEN 910 :REM*** NUMB 
ER HAS BEEN USED *** :гет 226 
IF J<RN ТНЕМ J=J+1:GOTO 940 :геп 191 
C(CD,CL,RN)-Z :rem 216 


REM*** PRINT NUMBER IN THE BOX *** 


:rem 55 
N$-STR$(Z) :rem 24 
LN=LEN (N$) гет 27 
FORQ=1TOLN-1 :геп 2 
SN=S(CD)+CL*3+RN*80+Q+(3-LN) :гет 49 
PN-ASC(MIDS$(N$,Q*1,1)) :rem 189 
РОКЕ 5М,РМ :rem 94 
КЕХТО :rem 85 
IF RN«4 THEN RN=RN+1:GOTO 910 
:rem 122 
IF CL«4 THEN CL=CL+1:GOTO 890:геп 79 
IF CD«3 THEN CD=CD+1:GOTO 880:rem 54 


RETURN :rem 169 
REM *** SELECT THE NEXT BALL NUMBER* 
E :rem 110 
GOSUB 1730 :REM*** FIRST CHOOSE THE 
(SPACE)LETTER *** :rem 33 
REM*** NEXT THE NUMBER ***  :rem 140 


NU-INT(RND(9)*15):NMZNU-*1-NC*15 
:rem 50 
REM*** HAS IT ALREADY BEEN USED? *** 
:rem 176 
IF N(NC,NU)-1 THEN 1119:REM*** YES-G 


ET ANOTHER *** :rem 221 
N(NC,NU)-1 :rem 52 
RETURN :rem 168 
REM*** PRINT THE NUMBER ON THE BIG B 
ЖЕН X*k :rem 75 
N1=INT(NM/1@) :N2=NM-N1*19 :гет 182 
IF N1=@THEN N1=-16 :rem 197 


POKE 1282,L(NC) : POKE1283,N1+176:POKE 


1284,N2+176 :rem 113 
POKEV+44,CO(NC) :rem 124 
REM*** CHECK FOR NUMBER ON THE CARDS 
ER :rem 158 
NN=ð :rem 207 
BO=0 :rem 197 
Ср=0 {4 SPACES}:REM *** CARD LOOP *** 
:гет 42 

CR=0[4 SPACES]:REM *** ROW LOOP *** 
:rem 23 

IF C(CD,NC,CR)«»NM THEN 1390 :геп 3 
IF AU»1 THEN{2 5РАСЕ5)2270 :rem 89 


NN-1 :REM*** FOUND A MATCH *** 
:rem 26 


REM*** PUT THE RED COVER-TOKEN ON TH 


E NUMBER *** :rem 205 
P1=S (CD) +CR*89+NC* 3+1 :геп 117 
РОКЕ P1+SS,8 :rem 171 
POKE P1+1+SS,8 :rem 8 
POKE P1+1,N2+176 :rem 73 
POKE P1,N1+176 :rem 237 
GOSUB 1890 :REM*** RING THE CHIME ** 
5 :rem 173 
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1370 


1380 
1390 


1400 
1410 


1420 
1430 


1440 
1450 
1460 
1470 
1486 


1490 
1500 


1510 


1520 
1530 
1540 


1556 
1566 


1576 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1666 
1670 
1680 
1690 
1700 
1710 


1720 
1739 


1740 
1750 
1760 
1770 
1786 


1790 


GOSUB 2000:REM*** CHECK FOR A WINNER 


ылды :гет 128 
GOTO1400 :геп 202 
IF CR<4 THEN CR=CR+1:GOTO1270 

:rem 144 


IF CD«3 THEN CD=CD+1:GOTO1260:rem 92 
IF NN=ØTHEN GOSUB 1950:REM*** NO MAT 


CH-SOUND THE GONG *** :rem 194 

Y(NC)-2230 :rem 212 

POKE V+1+NC*2,Y(NC):REM SET INIT Y 
гет 191 


IF BO-0 THEN RETURN:REM*** NO WINNER 
- GET NEXT BALL *** :rem 86 
GET A$:1F А5-""ТНЕМ 1450:REM*** WINN 


ER-WAIT FOR A RESTART *** :rem 83 
POKE V+21,%:RESTORE:CLR:GOTO1L5@ 
:rem 188 
REM*** MAKE THE BINGO SPRITES *** 
:rem 68 
REM*** ZERO THE SPRITES MEMORY *** 
:rem 209 
FORI-0TO3 :rem 65 


POKE 251,1*64:POKE252,57:POKE253,63: 
РОКЕ 254,00:5Ү5 28672:NEXTI  :rem 92 
РОКЕ 251,00:РОКЕ252,58:РОКЕ253,63:РО 
KE 254,00:5Ү5 28672 :rem 3l 
REM*** SET UP TO ZERO SOUND *** 

:rem 165 
POKE 251,00:POKE252,212:POKE253,24:P 
OKE 254,00 :rem 4 
REM*** READ IN THE BIG BALL SPRITE * 
ЖЖ :rem 2 
FORI-OTOA4:FORJ-22TO46:READ SD:rem 69 
POKE (14592+1*64+J),SD:NEXT:NEXT 


:rem 131 

FOR I-OTO63:READ SD:POKE 14912+1,5р: 
NEXT :rem 125 
POKE V+21,63:REM ENABLE THE SPRITES 
:rem 70 

FORI=9TO5 :rem 68 
POKE 2040-1,228-І :rem 108 


REM*** SET UP THE SPRITES ***:rem 68 
POKE V-394-I,CO(I):REM*** SET THE SPR 


ITE COLOR *** :rem 238 
X(I)=145+1*12 :rem 148 
Ү(І)-230 ігет 144 


Х(5)-156:Ү(5)-83:КЕМ%%% LARGE SPRITE 
LOCATION *** :rem 249 
POKE V«-I*2,X(I):REM*** SET INITIAL X 


-POSITION *** :rem 74 
POKE У-1%1%2,Ү(І):ВЕМ%%% SET INITIAL 
Ха EK :rem 7 
NEXTI :rem 87 
POKE V+23,32:POKE V+29, 32 srem 92 


REM*** READ IN THE BINGO SONG *** 


:rem 226 
FORI=@T021:READFL(1),FH(1),DU(1I):NEX 
т :rem 26 
RETURN :rem 176 


NC-INT(RND(1)*5):REM*** SELECT THE B 
ALL LETTER *** :rem 64 
YM-INT(RND(O)*13):1F YM«5 THEN ҮМ-5: 
REM*** GET THE MAXIMUM HEIGHT *** 


:rem 183 
J=6 :rem 132 
Ү-712-2%ҮМ%7%230 :rem 161 


POKE (V+NC*2),X(NC):POKE(V+1+NC*2),I 
NT(Y) :rem 104 
IF Ү<-132ТНЕМ RETURN:REM*** BALL МЕМ 
Т OVER РА55 LINE *** :rem 228 
IF J«2*YM THEN 7=7+1:С0Т01760:гег. 133 


1800 


1810 


1820 


1830 
1840 


1850 


1860 
1870 
1880 
1890 
1900 


1910 
1920 
1930 
1940 
1950 
1960 


1970 
1980 


1996 
2000 


2010 
2020 


2030 
2040 


2050 


2060 
2070 
2080 


2090 
2100 
2110 
2120 
2130 


2140 
2150 
2166 
2170 
2180 
2190 
2200 


2210 


2220 
2230 
2246 
2250 


2260 
2276 


GOSUB1830:REM*** MAKE THE BALL PLOP 


{SPACE}SOUND *** :rem 13 
GOTO1739:REM*** GET NEXT BALL *** 
:rem 34 
REM*** SOUND OF THE BALL PLOP *** 
:rem ð 
SYS 28672 :rem 212 
POKESS,255:POKESS-*1,93:POKESS-*5,2 
:rem 58 
РОКЕ55+22,104:РОКЕЅ5+23,1:РОКЕ55+24, 
79:POKESS+4,129 :rem 97 
РОКЕ55--24,0 :rem 145 
RETURN :rem 176 
REM*** CHIME SOUND *** :rem 160 
SYS 28672 :rem 218 
POKE 55-1,255:РОКЕ SS+5,9:POKESS+15, 
225:РОКЕ SS+24,15 :rem 46 
POKESS+4, 21 srem 142 


FORTT-1TO390:NEXT:POKESS-4,20:rem 116 


RETURN :rem 173 
REM*** SOUR BONG SOUND *** ¿rem 166 
SYS 28672 :rem 215 


POKE SS+1,55:POKE SS+5,9:POKESS+15,2 
5:POKE SS+24,15 srem 208 
POKESS+4, 21 :rem 148 
FORTT=1 T0399 : NEXT: POKESS+4, 20: POKE S 


5+24,9 :rem 118 
RETURN srem 179 
REM*** ROUTINE TO LOOK FOR A WINNER 
{SPACE}*** :гет 155 
Al=3:A2=80:A3=0:A4=0 :rem 46 


WI=NC:GOSUB 2120:REM*** CHECK ROWS * 
bd :rem 116 
А1-80:А2-3:А3-0:А4-0 :геп 48 
WI=CR:GOSUB 2120:REM*** CHECK COLS % 
pute :rem 96 
IF NC«»CR THEN 2080:REM*** IS 4 ON M 


AJOR DIAGONAL? *** :rem 92 
А1=0:А2=3:А3=80:А4=0 :rem 51 
GOSUB 2129 :rem 14 


IF NC<>(4-CR) THEN RETURN:REM*** IS 
{5РАСЕ}# ON MINOR DIAGONAL? *** 


:rem 51 
А1=0:А2=3:А3=0:А4=80 :rem 54 
GOSUB 2120 :rem 8 
RETURN :rem 164 
WJ=9 :rem 211 
WM=S (Ср) +WI*A1+WJ*A2+WJ*A3+(4-WdJ) *A4 
+1 :rem 133 
WP=PEEK (WM) :rem 197 
IF WP<128THENRETURN :rem 228 
W(WJ)=wM + SS :rem 196 
WJ=WJ+1:IF МЈ <=4ТНЕМ2130 :rem 177 


REM*** CHANGE WINNERS COLOR *** 

:rem 246 
FOR WJ-0TO4:FORQ-OTOl : POKEW(WJ)+Q,7: 
МЕХТ:МЕХТ:ВО-1 :rem 7 
REM*** PLAY THE BINGO SONG *** 

:rem 97 
РОКЕ54296,15:РОКЕ54277,10:РОКЕ54278, 
10:REM SET VOL,ATT/DEC,SUS/REL 

гет 211 
FORI-0TO21:POKE54272,FL(I):POKE54273 
,ЕН(І):РОКЕ54276,33 :rem 243 
FORT-OTO DU(I)*4:NEXT:POKE54276,0:NE 


xT :rem 98 
REM*** CHANGE WINNERS COLOR *** 

:rem 243 
FOR WJ=@TO4 : FORQ=6TO1 : POKEW(WJ)+Q,6: 
NEXT: NEXT: BO=1 :rem 3 
RETURN :rem 170 
REM JOYSTICK TOKEN ROUTINE :rem 198 


2280 
2299 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2392 


2400 
2410 


2420 
2430 


2440 


2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 


2620 


2630 


2640 


2656 


26660 
2670 


2680 
2690 


CM- F(CD) :rem 183 
OC-PEEK(CM):REM OC=OLD COLOR:rem 237 
POKE CM,5:POKE CM+1,5:REM COLOR ІТ G 
REEN :rem 79 
KB=PEEK(D@):REM READ THE KEYBOARD СО 


NTROL REG :rem 229 
POKE D@,255:PD=PEEK(D1) :rem 40 
Jø=-( (PDAND8 )=0) :rem 90 
( (PDAND2 )=0) :rem 86 
( (PDAND4)-2) :rem 90 
( (PDAND1 )-0;) :rem 89 
FB--((PDAND16)-2) :rem 155 


POKE DZ,KB:REM RESTORE KEYBOARD 

:rem 188 
IF (J@+J1+J32+33+FB)=6 THEN 2560 

:rem 57 
IF FB-1THEN 2490 :rem 73 
СС-СМ-(20-72)%3-(21-73)%80:ВЕМ COMPU 
TE NEW POSITION :rem 227 
FR-INT((CC-S(CD)-SS)/420) :rem 110 
X0=S(CD)+SS+FR*40:X1=X0+14:REM MIN,M 
AX H-POSITIONS FOR CARD :rem 69 


IF CC»Xl OR СС<Х0 OR FR>8{2 SPACES]O 
R ЕК<0 THEN 2560:REM TEST IF OUTSIDE 
BOX :rem 212 
REM VALID NEW POSITION-MOVE THE CURS 
OR :rem 161 
POKE СМ,ОС:РОКЕ CM+1,0C :rem 92 
CM=CC:REM МОУЕ THE CURSOR :rem 52 
GOTO2290 :rem 212 


REM ACT ON FIREBUTTON-WE MUST CHECK 
(SPACE)IF THE CURSOR IS WITHIN A BOX 


AND IF :rem 227 
REM IT IS, IS THE NUMBER THE CORRECT 
ONE. :rem 89 
BÜ-PEEK(CM-SS)-48:Bl-PEEK(CM-SS-1)-4 
8 :rem 161 


IF ВӢ=М1 AND В1=М2 OR BO=N1+128 ANDB 
1=N1+128 THENGOTO1 290 :rem 26 


REM FIRE BUTTON PRESSED WHEN NOT ON 
{ SPACE }BOX :rem 111 
POKECM, OC: POKECM+1,0C:GOSUB 1950:REM 
SOUR GONG :rem 118 
NN=1:GOTO 1390:REM GET NEXT CARD 
:rem 199 
REM LOOP TILL JOYSTICK IS ACTIVE 
:rem 232 
FOR I-0TO20:NEXT :rem 233 
РОКЕ CM,OC:POKE CM+1,0C :rem 95 
FOR I-0TO20:NEXT :rem 235 
сото 2300 :rem 198 


DATA 160,00,165,254,145,251,200,196, 
253,208,249,96,252,0,3,255 :геп 227 
DATA 0,3,3,128,7,57,128,7,35,128,7,5 
Z 128: 33 (LAS, SE 2550509252 25/2/90) 
:rem 37 
DATA3,255,0,3,3,128,7,207,128,7,207, 
128,7,207,128,3,3,128,3,255,0,0,252 
:rem 183 
DATA252,0,3,255,0,3,25,128,7,25,128, 
7,41,128,7,49,128,3,57,128,3,255,0 
:rem 147 
рАТАЙ, 252,252,0,1,131,0,3,49,128,6,1 
21712876127, 128), 6, 13, 128),3) 57, 
:rem 239 
рАТА128,3,131,0,0,252 :rem 32 
рАТА252,0,1,131,0,3,57,128,6,124,128 
,6,124,128,6,124,128,3,57,128,3,131 
:rem 184 
DATA 0,080,252 :rem 59 
БАТАР 0/126/10/:151255/41:28/717/»2)55/422 43197 
255,248,63,255,252,63,255,252,127,25 
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2700 


5 ігеп 11 
DATA 254,120,0,30,248,0,31,248,0,31, 


30 


POKE198, 5: POKE631, 78: POKE632,69: POKE63 
3,87: POKE634,13:POKE635,131:END 


248,0,31,120,0,30,127,255,254,63,255 :rem 225 
:rem 166 1000 DATA 0,72,236,126,55,239,124,56,24 
2710 DATA 252,63,255,252,31,255,248,7,255 :rem 120 
,224,1,255,128,0,126,0,0,0,0,0,0,0,0 1001 DATA 1,63,63,30,118,118,30,63,63 
:rem 157 :rem 11 
2728 DATA 38,43,39,38,43,39,183,45,39,183 1002 DATA 2,24,56,124,239,55,126, 236,72 
,45,44,183,45,64,113,38,46,113,38,42 :гет 124 
:гет 238 1003 DATA 3,24,24,90,126,102,126,126,66 
2730 DATA 38,43,32,38,43,36,38,43,47,64,3 š : :rem 112 
4,50,64,34,54,113,38,37,113,38,39 1005 DATA 5,66,126,126,102,126,90,24,24 
:rem 75 :rem 116 
2740 DATA 113,38,51,64,34,57,83,32,53,168 1006 DATA 6,18,55,126,236,247,62,28,24 
,25,72,204,28,54,83,32,51,64,34,62 ігеп 83 
:rem 121 1007 DATA 7,252,252,120,110,110,120,252,2 
2750 DATA 64,34,75 :rem 125 52 :rem 39 
Tank Mania 1008 DATA 8,24,28,62,247,236,126,55,18 
:rem 87 
T 1009 DATA 9,0,0,12,28,56,48,0,0  :rem 225 
(Article оп page 102.) 1010 DATA 10,0,0,48,56,28,12,0,0 :гет 1 
1011 DATA 11,0,24,24,24,24,24,0,0 :rem 45 
BEFORE TYPING... 1012 DATA 12,0,0,0,62,62,0,0,0 :rem 145 
à Š 1016 DATA 16,0,112,126,102,32,48,48,0 
Before typing іп programs, please refer to “How Md s д i GG 
10 Туре COMPUTE!s Gazette Programs," “А 1017 DATA 17,228,18,37,68,36,18,33,198 
бериле s Guide To Typing In Programs,” апа seno 
e Automatic Proofreader” that appear before 1018 DATA 18,0,48,48,32,102,126,112,0 
te Program Listings. Есет 10 
1019 DATA 19,68,170,145,0,34,85,137,129 
Program. 1: Loader :rem 138 
4 BNIND'ICERI"IPOKES6,28POKES2,20:Che71o 1020 DATA. 20,153,90, GB, 253,459, 00, SOMME 
8: :rem 116 3 
FORI-7168T07679:POKEI,PEEK(1425600):Ngx 1021 DATA 21,129,137,85,34,0,145,170,68 
Т:РОКЕЗ6869,255 :rem 119 2 
READA: IFA=-1THEN9 а 1022 DATA ы аа 2 2772022 т 
FORI= E : Ж B 2. 
дере ввАрварокесвиваватов МЕХТ 93 1023 DATA 23,198,33,18,36,68,37,18,228 
x B 92 
GOTO6 :rem 167 сел 
РОКЕЗ6878,15 Ten 10 1024 DATA 240,12, a E Біз 
10 ҒОВІ-0Т021:Р + : -L, ^ 
К re ae Redoute Ma ade EG. 146 DATA. ZG GL 0,66, 00722 36660 птеп 79 
T x 2 239 1055 DATA 55,126,255,255,255,255,255,255, 
еп 126,-1 zrem 19 


11 


POKE7680+L, 170: POKE7680+L+1 , 7: POKE8185 
-L,170:POKE8185-L-1,1 zrem 4 Program 2: Main Program 


POKE36875,128+6*L:C=(C-(C<7))*-(C<7):I 1 C=22:R=22:S=7680:A=30729:DD=37154: P1=37 


FC=1THENC=4 
NEXT : [FK=1 THENRETURN 
PRINT"{6 DOWN}{6 SPACES}{RVS}{GRN}cccc 


:rem 122 
:геп 52 


CCCCCCC":PRINT"{6 SPACES][RVS][GRNITAN 


K MANIA!" 
PRINT"Í6 SPACES][RVS][GRN]CCCCCCCCCCC" 


:rem 29 


:rem 200 


PRINT"{3 DOWN}{RVS}{BLU}{5 SPACES}PRES 
S ANY KEY" 

AS$="":GETAS : IFAS=""THEN21 
PRINT" {CLR} {DOWN}":PRINT"{RVS}{YEL}RIG 


:rem 245 
:rem 9 


HT JOYSTICK (RED)";"{OFF}{PUR} A" 


:гет 156 


PRINT" {DOWN}{BLK}G";"{RVS}{YEL} LEFT J 


OYSTICK";"[RVS](BLUE) [DOWN][BLU]";" 
{OFF}7{RVS}{YEL} BLOCKADES": PRINT" 


{DOWN}.{RVS} MINES" 


:rem 122 


24 PRINT"{2 DOWN}{RVS}{CYN}{4 SPACES}PRES 
S ANY KEY " :rem 104 
25 AS="":GETAS : IFAS=""THEN25 :rem 17 
26 PRINT"{CLR}" :rem 204 
27 K=1:GOSUB9:POKE77@2, 32: POKE8163, 32:POK 
E36869, 248 :гет 230 


28 


PRINT"[HOME][2 DOWN}{2 SPACES}JUST A F 
EW MOMENTS" 


:rem 252 
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13 


14 


151:P2=37152:SL=5:DA=37136:REM SL-SKILL 

LEVEL :rem 200 
POKE36879,29:T=3:CY=4:CE=6:CA=7:CS=7:CQ 
=4:CM=0:X=-1 :rem 156 
V=36878:S1=V-2:S2=V-1:DIMDC%(2,2),0C%(2 
,2),U(1),0(1),0(1),D(1),E(1) :rem 127 
FORI=ØTO2 : FORJ=6TO2 :X=X+1:DC%(1I,J)=X:0C 
%(І,7)-Х416:МЕХТО,І :гет 193 
DEFFNA(Z)=S+X+C*Y : DEFFNB(Z)=PEEK(FNA(Z) 
):DEFFNR(Z)-INT(RND(1)*Z) :rem 66 
POKEV-9, 255:PRINT" {CLR} {BLK}":X=S+A: FOR 
I=XTOX+595 : POKEI , T: NEXTI : GOSUB19@ 


srem 163 
POKE36879, 29: FORI=1T03+2*SL:X=FNR(C) :Y= 
FNR(R) :rem 132 
POKEFNA (Ø) , 46: POKEFNA(@)+A,CA:NEXT 

:rem 167 
X=FNR(C):Y=FNR(R) : IFFNB(@) <>32THEN11 

:rem 90 
р(й)-Х:Е(0)-Ү:0(0)-ЕМА(0):0(0)--1:0(0) 
=FNR(3)-1 :rem 172 
РОКЕҒЕМА(0),рс%(0(0)-1,0(0)-1):РОКЕЕМА( 
0) «А,СҮ :rem 143 
X=FNR(C):Y=FNR(R):IFFNB(0)<>32THEN14 


:rem 96 


73 


74 


р(1)=Х:Е(1)=Ү:0(1)=ЕМА(0):0(1)=1:0(1)= 
FNR(3)-1 :rem 135 
POKEFNA(@),DC$(U(1)+1,0(1)+1) s POKEFNA( 
9)+A,CE:FORI=1T059@:NEXT :rem 9 
ONW-1GOSUB75,41:1FFBTHENX-D(W):Y-E(W): 


PX=U (W) : PY=O(W) :GOTO46 :rem 4 
B=9:F=0: IFJ3THENB=1 :rem 43 
IFJ2THENB=-1 srem 121 
ІЕЈІТНЕМЕ=1 :rem 80 
IFJ@THENF=-1 :rem 125 
IFB-ÜANDF-OTHEN B=U(W):F=O(W) :rem 136 
U(W)=B:O(W)=F :rem 153 
D(W)=D(W)+U(W) :E(W)=E(W)+O(W) :геп 26 


X=D(W) : Y=E(W) :J=FNB(@) : 1FJ=32THEN35 
:rem 5 
IFJ> 54THENX=X-U(W) :D(W)=D(W)-U(W) :Ү=Ү- 
O(W) :E(W)=E(W)-O(W) :GOTO35 :rem 64 
GOTO 60 :rem 6 
POKEQ(W),32:POKEQ(W)-*A, Tz Q(W) -FNA(2) :P 
OKEQ(W) ,DC%(U(W)+1,0(W)+1) :POKEQ(W)+A, 


CY+2*W :rem 12 
J=0: IFW=1THENW=0:GOTO18 :rem 126 
W=1:GOTO18 :rem 12 


P=PEEK (DA) :J@=-( (PAND4)=G) :71=-((РАМЮ8 
)28) :72=-((РАМр16)=0):73=-((РАМЮ2)=9) 


:rem 56 
ЕВ=- ((РАМр32)=0) : RETURN :rem 9 
Z-PX*PY:POKEV,8:IFZ-lTHENJ-10  :rem 71 
IFZ=-1THENJ=9 :rem 222 
IFZ=@ANDPX=9THENJ=11 :rem 194 
IFZ-ÜANDPY-OTHENJ-12 srem 197 


ЕОҺІ-1Т010:Х-Х-РХ:Ү-Ү-РҮ:РОКЕ52,230-І 


:rem 35 
IFI<>1THENPOKEZ, 32:POKEZ+A,T :rem 225 
B=FNB(@):IFB=32THEN58 :rem 134 
IFB<>55THEN57 :rem 184 
IFB=55THENI=19:NEXTI: POKEV, 9:GOTO19 

геш 177 
I-10:NEXTI:GOTO60 :rem 238 


Z=FNA(@) : POKEZ , J : POKEZ+A,CM:NEXTI 


:rem 64 
POKEZ, 32: POKEZ+A, T: POKEV, 0: GOTO19 

:rem 47 
POKES2 , 239: SC=X-1: IFSC<@THENSC=G 

zrem 155 
FC=X+1 : LFFC> CTHENFC=C :rem 236 
SRzY-1:1FSR«ÜTHENSR-Ü :rem 28 
FR=Y+1:IFFR>RTHENFR=R ігеп 58 


FORX-SCTOFC:FORY-SRTOFR:J-OC$(X-SC,Y-S 


R) :rem 122 
РОКЕРМА(0),2:РОКЕЕМА(0)-А,СО:МЕХТҮ,Х 
:rem 167 


POKES1, 220: FORJ=15TOOSTEP-1: POKEV,J: FO 
RJ1=1T059:NEXTJ1:NEXTI :rem 88 
POKEV, Ø : FORX=SCTOFC: FORY=SRTOFR: POKEFN 
А(9), 32: РОКЕРМА (0) +А,Т:МЕХТҮ,Х:гет 174 
IFPEEK(Q(1))-232ANDPEEK(Q(2) ) -32THENWC- 
WC+1:WH=WH+1:AS="YOU GOT EACH OTHER!": 
GOTO72 :rem 73 
IFPEEK(Q(@))=32THENAS="RED IS REARRANG 
ED!" :WC=WC+1:GOTO72 :rem 83 
IFPEEK(Q(1))-32THENAS$-"BLUE IS TANK DU 
ST1":WH=WH+1:GOTO72 :rem 54 
GOTO18 :rem 10 
POKEV-9,240:PRINT"[CLR][3 DOWN]";AS:PR 
INT"{2 DOWN}SCORE: BLUE";WC;" RED";WH 
:гет 155 
PRINT"{3 DOWN]PRESS ANY KEY TO STOP":F 
ORI=1TO400@:GETAS:IFAS<>""THENI=400:NEX 
TI:END :rem 75 
МЕХТІ:СОТО6 :rem 156 


POKEDD, 127: P-PEEK(P2)AND128:J3--(P-2): 
POKEDD, 255 


:rem 254 


76 P=PEEK(P1):Jl1=-((PAND8)=0):J2=-((PAND1 
6)=0) :rem 51 
77 J@ü@=-((PAND4)=0):FB=-((PAND32)=0):RETUR 
N :rem 149 
100 FOR RA-OTOSL*10:POKES-*INT(RND(1)*484) 
,55:МЕХТ :rem 167 
101 FOR L=0@ ТО 21 :rem 56 
103 РОКЕ S+L,55 :rem 35 
104 РОКЕ S+(22*22)+L,55 :rem 146 
105 NEXT L :rem 33 
106 FOR 0=0 TO 484 STEP 22 :rem 35 
107 РОКЕ S+U,55 :rem 48 
108 POKE S+21+U,55 :rem 191 
109 NEXT U:RETURN :rem 72 
Г] 
Variable Storage 
(Article on page 108.) 
Program 1: Variable Utility 
44440 REMÍ3 SPACES]DUMP... :rem 164 
44441 REM***START WITH GOTO 44444:rem 106 
44443 END:REM PROTECT SUBROUTINE  :rem 41 
44444 ZB=PEEK(47)+256*PEEK (48) -7: ZA=PEEK ( 
45 )+256*PEEK(46) ҙгеп 185 
44450 PRINT"STRINGS &{2 SPACES}VARIABLES: 
" : PRINT '' # # * * k k k * k k * ck ck k k k k k k k К w 
:rem 114 
44460 FOR ZZ=ZA ТО ZB STEP 7 :rem 39 
44465 IF PEEK(ZZ)>127 THEN GOSUB 44710:С0 
TO44520:REM INT VAR :rem 171 
44470 IF PEEK(ZZ+1)<128 THEN GOSUB 44543: 
GOTO 44520:ВЕМ FP VAR :rem 177 
44475 REM*****STRING*******kk*kk***VARIABL 
E :rem 39 
44480 GOSUB44485 :GOT044529 :rem 255 
44485 PRINTCHR$ (144 )CHR$ (PEEK (ZZ ) )CHR$ (PE 
EK(ZZ+1)-128)CHR$(36)CHR$(61); 
:rem 76 
44490 ZY=PEEK(ZZ+3)+256* PEEK (ZZ+4) :ZX=PEE 
K(ZZ+2):REM STRINGADDRESS AND LENGT 
H :rem 56 
44495 IF 7Ү=0 THEN 44510 :rem 230 
44500 FOR Z@=1TOZX:PRINTCHRS (PEEK(ZY));:Z 
Y=ZY+1:NEXTZ@ :rem 234 
44510 PRINT: RETURN :rem 165 
44520 NEXTZZ :rem 242 
44525 GOSUB 44805:КЕМ DO ARRAYS NOW:rem 0 
44530 PRINT:PRINTCHRS(144)"....ALL DONE": 
END :rem 75 
44540 REM***FLOAT PT*XX********VARIABLE 
:rem 187 
44543 IFPEEK (ZZ)=9@ AND(PEEK(ZZ+1)=65 OR 
{SPACE} PEEK(ZZ+1)=66)THEN RETURN 
:rem 148 
44545 PRINTCHR$ (144 )CHR$ ( PEEK (ZZ ) )CHR$ (PE 
EK(ZZ+1))CHR$(61); :rem 198 
44550 71-21(РЕЕК(77%2)-129) :rem 251 
44560 72-128:73-256:74-1 :rem 62 
44570 Z5=PEEK(ZZ+3): IFZ5>=128 THEN Z5=Z5 
-128:24--1 :rem 123 
44580 29-71%75%71/22-РЕЕК(22%4)%271/272/73- 
РЕЕК(227--5)%71/72/7312%РЕЕК(27-6)%71 
/22/7313 :rem 78 
44590 PRINTZ9*Z4 :rem 222 
44600 RETURN :rem 222 
44700 REM***INTEGER****JXXd ce *VARTABL 
E :rem 43 
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44710 


44720 
44730 
44740 
44750 
447698 
44800 


44805 


44806 


44810 
44815 
44820 
44825 
44828 
44829 


44830 
44840 


44850 


44860 
44870 
44880 


44890 
44900 


44910 
44920 


449304 


44940 
44956 
44966 
44976 


44986 
45000 


45010 
45020 


45030 


45040 
45050 
45060 
45879 


45080 
45100 


PRINTCHR$(144)CHR$(PEEK(ZZ)-128)CHR 
$(PEEK(ZZ-1)-128)CHR$ (37 )CHR$ (61); 


:rem 12 
Z4=1:2Z7=PEEK(ZZ+2) :78=РЕЕК(77+3) 

:rem 29 
IF 27 »127THENZ7-255-27:28-256-28:2 
4- -1 :rem 25 
Z9=Z7*256+Z8:REMNOTE REVERSE HIBYTE 
-LOBYTE SEQUENCE :rem 114 
PRINTZ9*Z4 :rem 220 
RETURN :rem 229 
REM*** ARRAY****k*kkkkkkkk***VARIABLE 
S :rem 240 


IFZQ-OTHENZA-Ü:GOSUBA44550:ZA$-0:GOS 
UB44720:2R-2:20-22:2X-2:7Y-2:20-2 

:rem 84 
REM ABOVE DUMMIES NEEDED TO STABILI 
ZE{3 SPACES}POINTER TO ARRAYS 

:rem 240 
ZZ=PEEK (47)+256*PEEK( 48) : IFZZ-PEEK( 
49)+256*PEEK(5@)THEN RETURN :rem 32 
PRINT"SPACEBAR WHEN READY{3 SPACES} 
FOR ARRAYS":WAIT197,32 :rem 25 
IF PEEK(2ZZ+4) <>1THENGOSUB45119:GOTO 
44820:REM MULTI-D ARRAY :rem 125 
IF PEEK(ZZ)>127 THEN GOSUB 44900:С0 
TO44820:REM INT ARRAY :rem 69 
IF PEEK(ZZ+1)>127 THEN GOSUB 45010: 
GOTO44828:REM STRING ARRAY :rem 137 
REM*****FT,OAT PT kk kk kk kk k***ARRAY 


:rem 82 
ZQ=ZZ:ZZ=ZZ+7 :rem 224 
FOR ZR=@ ТО PEEK(ZQ+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM 3 :rem 70 


PRINTCHRS(144)CHRS(PEEK(ZQ))CHRS(PE 
EK(ZQ*1))CHR$ (40) ZRCHR$ (41) CHR$ (61) 


g :rem 204 
ZZ=ZZ-2:GOSUB44550:ZZ=ZZ+2 :rem 2 
22=22+5 :геп 12 
МЕХТ2В:1Е72-РЕЕК(49)--256%РЕЕК(50)ТН 
ЕМ RETURN :rem 108 
GOTO44820 :rem 68 
REM****INTEGER***********k*ARRAYS 
:rem 101 
20=22:22=22+7 :rem 223 
FOR ZR=@0 ТО PEEK(ZQ+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM :rem 69 


PRINTCHR$(144)CHR$(PEEK(ZQ)-128)CHR 
$ (PEEK(ZQ+1)-128)CHR$(37)CHR$(40); 


ігеп 251 
PRINTZRCHR$(41)CHRS(61); :rem 233 
ZZ=ZZ-2 :GOSUB4472ð:ZZ=ZZ+2 zrem 1l 
22=22+2 :rem 9 
NEXTZR:IFZZ-PEEK(49)4256*PEEK(50)TH 
EN GOTO 44530 :rem 197 
RETURN :rem 233 
REM****STRING***X**xdXx*x***ARRAYS 

:rem 80 
ZQ=ZZ:ZZ=ZZ+7 srem 215 
FOR ZR=@0@ ТО PEEK(ZQ+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM :rem 61 


PRINTCHR$(144)CHR$ (PEEK(ZQ) )CHR$(PE 
EK(ZQ*1)-128)CHR$ (36) CHRS$ (42); 


:rem 42 
PRINTZRCHR$(41)CHR$(61); :rem 225 
ZZ=ZZ-2:GOSUB44490:ZZ=ZZ+2 :rem 253 
22-77-43 :rem 2 
NEXTZR:IFZZ-PEEK(49)-256*PEEK(50)TH 
EN GOTO 44530 :rem 189 
RETURN :rem 225 


REM**MULTI-D**********kkk*kkkARRAYS 
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45110 ZX-2:2Y-2:PRINTCHR$(43)PEEK(ZZ*4) "D 
IMENSIONALARRAY:":PRINTTAB(5); 


:rem 16 
45120 IF PEEK(ZZ)<127THENPRINTCHRS (PEEK(Z 
2)): :GOTO45140 :rem 111 
45130 PRINTCHR$(PEEK(Z2Z)-128);:2Z2X-1 
ігеп 99 
45140 IFPEEK(ZZ-*1)-OTHEN45170 :rem 176 
45145 IFPEEK(ZZ+1)=128THEN ZY-1:GOTO45179 
:rem 180 
45150 IF PEEK(ZZ+1)<127THENPRINTCHRS (PEEK 
(ZZ+1));:GOTO45170 :гет 45 
45160 PRINTCHRS(PEEK(ZZ-41)-128); :ZY-1 
zrem 195 
45170 IF 2Х-1 AND ZY=1THENPRINT"$"; :GOTO4 
5190 :rem 122 
45180 IF 7Ү=1 THENPRINT"S"; ігеп 17 
45190 PRINTCHR$ (48); :rem 129 
45200 Z9-PEEK(ZZ-4) :rem 84 


45210 FORZ8=Z9TO1STEP-1 :Z7=PEEK (ZZ+4+2*Z8 
)+( PEEK (2ZZ+4+2*Z8-1))*256-l:rem 254 


45220 PRINTZ7; :rem 86 
45230 IFZ8-l1THENPRINTCHR$S(41):G0TO45258 
:rem 115 
45240 PRINTCHR$(44);:NEXTZ8 :rem 140 
45250 PRINT :rem 141 


45260 ZZ=ZZ+PEEK(ZZ+2)+PEEK(ZZ+3)*256:1F 
(SPACE)ZZ-PEEK(49)-256*PEEK(50) THEN 
44530 :rem 107 

45270 RETURN :rem 226 


Program 2: 
Variable Utility, Condensed Version 


44443 END:REM MINIDUMP FPVAR & $ :rem 36 
44444 ZB-PEEK(47)-256*PEEK(48)-7:ZA-PEEK( 


45)--256%РЕЕК(46) :гет 185 
44460 FORZZ-ZATOZBSTEP7 :rem 39 
44470 IFPEEK(ZZ+1 ) <128THENGOSUB44543:GOTO 
44520 :rem 20 
44480 GOSUB44485:GOTO44520 ігеп 255 


44485 PRINTCHR$(144)CHRS(PEEK(ZZ))CHRS(PE 
EK(ZZ+1)-128)CHR$(36)CHRS(61); 


ігеп 76 

44490 ZY=PEEK(ZZ+3)+256*PEEK(ZZ+4):ZX=PEE 
K(ZZ+2) :rem 168 

44495 IFZY=OTHEN44519 :rem 230 
44500 FOR Z@=1TOZX: PRINTCHRS (PEEK(ZY));:Z 
Y=ZY+1 :NEXTZ0 :rem 234 

44510 PRINT:RETURN zrem 165 
44520 NEXTZZ Р :rem 242 
44530 END :rem 215 
44543 IFPEEK(ZZ)=9@THENRETURN :rem 114 
44545 PRINTCHR$ (144 )CHR$ (PEEK (ZZ ))CHR$ (PE 
EK(ZZ+1))CHR$(61); :rem 198 

44550 71-21 (РЕЕК(72%2)-129) :rem 251 
44560 22-128:23-256:24-1 :rem 62 
44570 Z5-PEEK(Z2243):1FZ5»-128THENZ5-25-12 
8:Z4=-1 :rem 123 


44580 79-71%75%71/72%РЕЕК(27-4)%71/72/73- 
РЕЕК(22-%5)%21/72/7312%РЕЕК(27-6)%71 


/22/2313 :rem 78 

44590 PRINTZ9*Z4 :rem 222 

44600 RETURN :rem 222 
BEFORE TYPING... 


Before typing in programs, please refer to “How 
To Type COMPUTE''s Gazette Programs," “A 
Beginner's Guide To Typing In Programs," and 
(А fe Automatic Proofreader" that appear before 
the Program Listings. 


Checksums 
For Eqrly GAZETTE Programs 


In the January issue, we asked for reader response 
concerning checksums for early (July-October) 
GAZETTE programs. Response was great, so we've 
chosen some of the longer and most difficult-to- 
type programs. 

If you've already typed in a program, you 
can use “Automatic Proofreader” to check each 
line of the program. Disk drive users can LOAD 
and RUN Automatic Proofreader, then LOAD the 
program to be checked. If you own a cassette drive, 
see the special loading instructions below. 

When the program to be checked has been 
LOADed, type SYS 886 to start Automatic Proof- 
reader. LIST the program and stop when it fills 
the screen (remember that CTRL will slow the 
listing and RUN/STOP will stop it). Position the 
cursor on the first program line and hit RETURN. 
The checksum number will appear in the upper 
left-hand corner. Press RETURN again and you 
will see the next number. When you reach the 
bottom of the screen, LIST the next section of the 
program. 

If you're typing in one of the programs below 
for the first time, LOAD and RUN Automatic 
Proofreader. Then type in the original listing while 
comparing the checksums. 


Special Notations 


There are a few symbols in the listings which 
should be noted. First, any letters appearing to 
the left of the line number represent the month. 
(O for October, D for December, etc.) in which a 
necessary correction was made in "Bug-Swatter." 
We've not included minor modifications. The 
letter appears only if the contents of the line are 
different from the original listing. Refer to "Bug- 
Swatter" in the issue noted for the correction. 

An asterisk (*) following a line number indi- 
cates that there were too many characters per 
logical line; therefore, the checksum is meaning- 
less. Remember, the VIC accepts no more than 88 
characters per line, and the 64 no more than 80. 
In cases where you see the asterisk, you can split 
the line by creating a new line number. For ex- 


ample, if line 350 is too long and the next line 
number is 360, simply create line 355 and type in 
a latter section of line 350. (After a colon is always 
a safe bet.) A better alternative is to type in the 
statement using keyword abbreviations (? for 
PRINT, P SHIFTed O for POKE, etc.). 


For Tape Users 


Because Automatic Proofreader is a machine lan- 
guage program that fits in the cassette buffer, it is 
erased when you load a program from tape. To get 
around this problem, follow these instructions: 


1. LOAD and RUN Automatic Proofreader. 
This will put the machine language program into 
the cassette buffer. 

2. Type the following lines in direct mode 
(without line numbers): 


AS-"PROOFREADER.T": В$="{10 SPACES]": FOR 
X = 1 TO 4: AS=AS+BS$:NEXTX 

FORX- 886 ТО 1018: A$ = A$ + CHRS$(PEEK(X) 
):NEXTX 

OPEN1,1,1,A$:CLOSE1 


After you type the last line, you will be asked 
to press RECORD and PLAY. We recommend 
that you start at the beginning of a new tape. 

You now have a new version of Automatic 
Proofreader. Turn your computer off and on, 
then LOAD the program you were working on. 
Put the cassette containing PROOFREADER.T 
into the tape drive and type: 


OPEN1:CLOSE1 


You can now get into Proofreader by typing 
SYS 886. To test this, PRINT PEEK (886) should 
return the number 173. If it does not, repeat the 
steps above, making sure that A$ (PROOF- 
READER.T) contains 13 characters and that B$ 
contains 10 spaces. 

The new version of Automatic Proofreader 
will load itself into the cassette buffer whenever 
you type OPEN1: CLOSE! and PROOFREADER.T 
is the next program on your tape. It will not disturb 
the contents of BASIC memory. 
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28000 :141 30050 :054 
29000 :135 30070 :092 


July Snake Escape (64) 


Snake Escape (VIC) |1057 — 6026 173 | 22010 :097 30080 2041 
š : 30090 :174 
100 :212 7010 :250 |15 :059 6027 +151 | 39919 2077 30100 i228 
110 :186 7020 :006 |20 :136 6028 :142 | 30020 :109 30110 :041 
йк? 7030 :194 |3@ :067 6040 :027 |30030 :178 30120 :214 
130 :199 7040 :236 |100 :239 6050 :215 | 39949 :111 
140 :247 7050 :083 110 :186 6060 :122 
150 :240 7060 :099 120 :247 6070 :214 
160 :017 7070 :174 |130 :199 6989 :228 | Alfabug (VIC) 
170 :119 8000 :085 |140 :247 7000 :063 |1 .060 79 .003 
180 :119 8005 :113 |150 :240 7010 :253 |5 :147 ad :175 
190 :057 8010 :180 |160 :017 7020 :040 |10 i223 81 :114 
200 :190 8020 :178 |170 :119 7030 :227 | og :193 85 :012 
210 :235 8030 :176 180 :119 7040 :154 ОБ 2237. 90 :087 
220 :110 8040 :051 |190 :057 7042 :102 | 3g :g04 100 :200 
230 :219 8045 :120 200 :195 7043 :176 34 :172 102 :094 
240 :102 8050 :225 |210 :237 7045 :197 |36 :131 105 :111 
AND BAS 8060 :009 220 :113 7050 :083 40 :242 110 :020 
260 :245 8070 :122 230 :219 7060 :099 50 :097 115 :056 
270 :046 8080 :132 |240 :102 7070 :174 |55 :039 118 :155 
280 :189 8090 :128 250 :232 8000 :185 57 :240 120 :061 
300 :125 8100 :124 260 :245 8005 :113 60 :031 130 :123 
310 :014 8110 :208 270 :046 8010 :194 70 :002 140 :043 
4000 :234 9000 :111 280 :189 8020 :179 75 :083 145 :004 
4010 :120 9010 :210 300 :096 8030 :177 76 5218 150 :109 
4020 :018 9020 :201 |310 :126 8040 :052 |77 :gog 175 :037 
4030 :031 9030 :144 4000 :234 8045 :137 78 :089 200 :922 


4040 :112 9040 :227 4010 :009 8050 :225 
4050 :091 9050 :042 4020 :163 8060 :009 
4060 (151 9060 :175 4030 :065 8070 :122 
4070 :170 9500 :120 4040 :112 8080 :132 


Alfabug (64) 


0 :031 85 


012 


4080 :188 9519 :051 |4050 :091 8090 :128 |1 :065 90 :214 
4090 :189 9520 :046 |4060 :151 8100 :124 |5 :094 100 :123 
4100 :165 9530 :251 |4070 :057 8110 :208 |6 :227 102 :094 
5000 :217 9540 :183 |4080 :166 9000 :200 |10 :030 105 :073 
5010 :124 9550 :189 |4090 :189 9010 :195 |20 :193 110 :020 
5020 :127 9560 :174 |4100 :165 9020 :171 |25 :236 115 :056 
5030 :130 9570 :072 |5000 :093 9030 :120 |30 :136 118 :091 
5035 :137 9580 :224 |5010 :124 9040 :225 |34 :219 120 :205 
5040 :169 9590 :023 |5020 :127 9050 :030 |36 :131 130 :123 
5050 :073 9600 :201 |5030 :130 9060 :175 |40 :242 140 :043 
5060 :007 9610 :123 |5035 :137 9500 :173 |50 :059 145 :003 
5070 :087 9620 :157 |5040 :169 9505 :108 |55 :039 150 :109 
5080 :136 10000 :242 |5050 :158 9510 :141 |57 :235 174 :124 
5090 :225 28000 :143 |5060 :007 9515 :179 |60 :147 175 :10й 
5100 :201 29000 :140 | 5070 :138 9520 :153 |70 :002 176 :042 
5110 :242 29010 :097 |5080 :059 9525 :147 |74 :128 177 :240 
5120 :189 30000 :200 |5090 :044 9530 :176 |75 :124 178 :128 
6000 :048 30010 :072 |5100 :158 9533 :156 |76 :218 200 :114 
6005 :238 30020 :104 | 5102 :102 9536 :149 |77 :090 205 :094 
6010 :194 30030 :173 | 5103 :017 9540 :183 |78 :233 210 :235 
6020 :049 30040 :106 |5106 :131 9550 :054 |79 :003 215 :233 
6025 :198 30050 :049 |5120 :221 9560 :174 |80 :174 220 :116 
6030 :123 30060 :103 |6000 :045 9570 :033 |81 :134 

6040 :080 30070 :243 | 6003 :998 9580 1090 

6050 :215 30080 :041 |6005 :214 9590 :03 

6060 :122 30090 :174 |6010 :155 9609 :216 | Мога Hunt (VIC) 
6070 :214 30100 :228 |6020 :167 9610 :123 |2 :019 5 :080 
6080 :247 30110 :041 |6021 :146 9620 :157 3 225 10 :123 
7000 :187 30120 :214 |6022 :136 10000 :242 |4 :216 11 :091 
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12 
ils} 
14 
20 
25 
70 
80 
90 
95 


100 
110 
120 
130 
140 
150 
170 
180 
190 
200 
210 
220 
230 
240 
256 
260 
270 
280 
290 
295 
300 
310 
320 
340 
360 
370 
380 
400 


1215 
:093 
255 
2091 
2161 
2165 
2116 
2232 
21377 
:063 
Е213 
:045 
:235 
:166 
:108 
:045 
:193 
:014 
:226 
:007 
ЭЛ 
:228 
222 
:141 
:136 
:029 
121107. 
:218 
:170 
:125 
:037 
:120 
:090 
:184 
:201 
:203 
gil 


410 :221 
430 :086 
440 :033 
450 :081 
460 :221 
470 :246 
490 :052 
500 :175 
510 :095 
520 :080 
530 :061 
550 :130 
560 :098 
570 :114 
580 :134 
590 :134 
600 :108 
610 :093 
620 :129 
630 :111 
640 :097 
650 :097 
670 :027 
680 :035 
690 :140 


710 
729 
740 
760 
770 
775 
780 
798 
800 
810 
820 
860 
861 
870 
880 
890 
900 
910 
920 
921 
930 
940 
950 
951 
960 
970 
980 
1000 
1020 
1025 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1140 
1150 
1160 
1170 
1190 
1200 
1210 
1230 
1240 
1250 
1260 
1270 
1280 
1300 
1310 
1320 
1330 
1340 
1341 
1342 
1343 
1344 


:186 
:093 
162 
SET 
:242 
ЛТ 
5126 
:027 
:166 
:108 
:228 
:02 
s 175 
:214 
:179 
:228 
:159 
:074 
:204 
:149 
:164 
:207 
:160 
:204 
2226 
221538 
:048 
:245 
1252 
:243 
:038 
:204 
:210 
E02 
:156 
2156 
2205 
:120 
:170 
2158 
:154 
2183 
:126 
:012 
:108 
:163 
gu 
:110 
:049 
ЛБ 
:203 
б 215) 
:024 
2865 
:040 
:017 
2151 
:070 
:214 
:012 
:061 
:063 


1345 :036 1520 :056 
1350 :201 1525 :040 
1360 :167 1530 :061 
137012: 243) 5355211638 
1380 :194 1540 :121 
1390550157 1541 :079 
1400 :066 T5509 ГІЗ 
1420 :000 1560 :025 
1430 :160 1570 :048 
1450 :173 1580 :023 
1460 :045 1590 :052 
1470 :032 1600 :018 
1480 :094 1610 :045 
1490 :083 1620 :020 
1491 :168 1630 :049 
1492 :006 1650 :206 
1493 :008 1660 :134 
1500 :002 1670 :253 
1505 :150 1680 :119 
1510 :062 1700 :137 
1515 :050 

Word Hunt (64) 

4 1:137 780 :254 

10 :224 798 :032 

11 :009 810 :039 

102 BALES} 1480 :094 
тз К: ӨЛЕ 1491 :046 
14 :080 1492 :241 
90 :188 1493 :001 
295 :047 1520 :238 
300 :175 1525 :086 
310 :072 1527 :010 
320-272 112270) ШЕНІ 
430 :086 1585 :237 
VU 2055 1541 :169 
VIC Timepiece 

10 :188 300 :070 

555 310 :072 

20 :059 320 :067 

30 :094 325 :090 

50 :022 330 :253 

60 :175 340 :038 

70 :171 350 :039 

80 :099 400 :116 

ӨЗ? 25/2 410 :020 

S5 BANS) 420 :175 

90 :170 430 :013 

100 :015 440 :207 

105 :136 450 :230 

110 %173 460 :202 

120 :100 500 :229 

130 :081 505 :011 

140 :251 (2j cbe) 

150 :208 520 117 

160 :220 5255/2172 

ЛӨ Galatia) 530 :011 

200 :172 600 :199 

210 :018 605 :009 

220 :010 610 :165 


620 :115 
630 :053 
640 :236 
650 :090 
659 3199 
660 :234 
670 :101 
680 :151 
690 :243 
695052102 
700 :019 
710 :119 
720 :142 
730 :086 
740 :021 
750 :088 
760 :148 
900 :114 
905 :206 
910 :235 
920 :240 
930 :110 
1000 :024 
1010 :004 
1020 :184 
1030 :254 
1040 :227 
1045 :175 
1050 :052 
1055 :047 
1060 :046 


August 


1070 :141 
1080 :164 
1090 :109 
1100 :135 
LEO tee 
1120 :030 
1130 :143 
2000 :047 
2005 :196 
2010 :076 
2015 72, 
2020 :202 
2030 :154 
2035 :198 
2040 :127 
2060 :119 
2080 :167 
2085 :166 
2090 :165 
2100 :057 
2110 :061 
2120 :198 
2180 :027 
2190 :144 
709922253 
8000 :028 
8010 :249 
8020 :240 
8025 :199 
8030 :007 
8040 :181 


Wordspell (VIC) 

0 :242 

21 :159 47 :197 
22 :007 48 :076 
23 :254 49 :091 
24 :194 50 :254 
25 :237 51 :181 
26 :025 52 :242 
27 :205 535128 
28 :194 54 :069 
29 :132 5516219 
3@ :075 56 :196 
31 :072 57: 159 
32 :164 58 :098 
33 :007 59 :069 
34 :095 6ЙІ 2255 
35 :238 алы 
36 :103 62 :157 
37 :194 63 :102 
38 :170 64 :038 
39 :076 65 :087 
40 :090 66 :035 
41 :093 67 :031 
42 :192 68 :117 
43 :126 69 :021 
44 :252 70 3166 
45 :070 71 :057 
46 :241 72 :245 
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73 :169 78 :028 
74 :069 79 :164 
75 :154 80 :015 
76 :088 81 :039 
77 :162 82 :179 
Wordspell (64) 

reg) 
21 1103 57 2202 
22 :007 28 5228 
231227) 6а (255 
26 :025 61 gal 
27 :205 62 :* 
28 :212 63 :* 
29 :132 64 :253 
30 :075 65 :136 
31 :072 66 :224 
ЕН 67 :000 
33 :007 68 :033 
34 :095 69 :118 
35 :238 70 :014 
36 :103 71 :0й5 
37 :194 72 :245 
38 :170 73 :169 
40 :108 75 :154 
41 :093 76 :088 
42 :918 77 :162 
43 :126 78 :028 
44 :078 79 :164 
45 :070 80 :015 
46 :241 81 :104 
47 1:255 83 :116 
Am Dec 85 :009 
49 :091 s йә? 
50 :254 82-:5083 
51 2181 set eer 
ВЭБА 100 :150 
53 :130 110 :141 
54 :069 120 :128 
86 215: 140 :117 
VIC/64 Mailing List 
8 1:209 29 :024 
19 :185 30 :153 
11 :016 31 :091 
13 :063 32 :115 
16 :199 33 :242 
17 :222 34 :152 
18 :213 35 :137 
19 :014 Ben Өл 
28 :* 37 :088 
21 :* 38 :250 
22 :208 39 :241 
23 :237 40 :149 
24 :095 41 :188 
25 :072 42 :199 
26. :079 43 :181 
28 :012 44 :243 


166 COMPUTE!’s Gazette April 1984 


45 :198 99 :253 
46 :014 100 :149 
47 :028 101 :964 
48 :012 102 :214 
49 :045 103 :042 
:158 104 :117 
217 106 :155 
Gilat) 197 .:170 
53 :011 108 :* 
54 :021 TNO ЛӘ, 
55 :059 112 102 
56 :066 114 029 
60 :078 116 :180 
62 :034 118 :054 
64 :214 120 :096 
66 :040 500 :207 
68 :134 510 :001 
70 :124 511 :003 
72 :039 512 :146 
ПЗЕ 179 51962225 
74 :196 514 :110 
76 :142 51550216 
78 :044 516 :063 
80 :011 БИЛЕТ. 
82 :078 518 ӨЛ 
84 :247 520 :249 
86 :192 530 251 
88 :227 540 :253 
90 :014 550 2255 
92 :205 560 :001 
93 :053 570 :003 
94 :245 580 :0й5 
95 :174 590 :007 
QE ШЫП 600 :039 
98 :092 610 :204 
The Viper (VIC) 
10 :110 250 :106 
20 :195 260 204° 
30 :136 270 :058 
40 :172 280 :237 
50 :060 290 :128 
60 :128 300 :079 
70 :135 310 :138 
80 :042 320 :017 
90 :040 330 :134 
100 :122 340 :056 
110 :068 350 :120 
120 2133 360 :007 
130 :162 370 :220 
140 :077 380 :042 
150 :145 390 :113 
160 :174 400 :131 
170 :057 410 :105 
180 :211 420 :194 
log: 233 430 :147 
200 :183 440 :244 
210 :247 450 :173 
22072113 460 :087 
230 :054 470 :202 
240 :059 480 :208 


490 :221 640 :141 
500 :197 650 :022 
510 :052 660 :175 
520 :056 670 :001 
530 :039 680 :038 
540 :156 690 :059 
550 :089 700 :101 
560 :012 710 :000 
N570:* 720 :121 
580 :094 730 :249 
590 :249 740 :245 
600 :226 750 3131 
| 610 :034 760 :007 
620 :167 770 :059 
630 :166 780 :045 
Тһе Viper (64) 
100 :007 540 :028 
110 :022 558 :060 
120 :156 560 :219 
130 :102 0570:184 
140 :018 580 :104 
150 :222 590 :202 
160 :124 600 :000 
170 :143 0610:161 
180 :026 620 :235 
190 :204 630 :039 
200 :237 640 :127 
210 :168 650 :195 
220 :075 660 :108 
230 :080 670 :029 
240 :134 680 :254 
250 :111 0690:254 
260 :143 700 :016 
270 :040 710 :199 
280 :120 720 :153 
290 :155 730 :013 
300 :038 740 :125 
310 :218 750 :017 
320 :167 760 :205 
330 :034 770 :114 
340 :173 780 :184 
350 :126 790 :175 
360 :177 800 :165 
370 :201 810 :237 
380 :106 820 :021 
390 :039 830 :174 
400 :098 840 :159 
410 :217 850 :059 
420 :180 860 :252 
430 :216 870 :109 
440 :245 880 :185 
450 :039 890 :161 
460 :103 900 :121 
470 :028 910 :243 
480 :053 920 :029 
490 :079 930 :255 
500 :207 940 :004 
510 :004 950 :168 
5206 y: 211 960 :018 
530 :096 970 :233 


980 :010 1220 :025 305 :182 
990 :244 1230 :172 310 :069 
1000 :024 1240 :235 400 :044 
1010 :229 1250 :175 420 :246 
1020 :047 1260 :221 430 :119 
1030 :* 1270 :244 440 :215 
1040 :058 1280 :180 450 :121 
1050 :188 1290 :236 500 :* 
1060 :068 1300 103 501 s* 
1070 :* 1310 :019 502 :251 
1080 :008 1320 :072 503 :023 
1090 :199 1330 2213 
1100 :084 1340 :094 
1110 :083 1350 :115 Cylon Zap 
1120 :0004 1360 :078 35 :093 
1130 :070 1370 :109 40 :102 
1140 :247 1380 :177 45 :186 
1150 :224 1390 :219 50 :005 
1160 :104 1400 :083 55 :068 
1170 :017 1410 :019 60 :108 
1180 :054 01420:124 65 :199 
1190 :053 1430 :186 70 :051 
1200 :163 1440 :055 75 :041 
1210 :023 1450 :069 80 :126 
Е 90 :156 
в 95 :024 
Cylon Zap: Setup АЧ кае. 
(УІС) 105 :211 
110 :008 
10 :039 20 :000 115 :045 
120 :099 
Cylon Zap: 125 :104 
130 :105 
Instructions (VIC) USE 
10 :219 165 :182 140 :110 
30 :232 170 :227 145 :161 
35 :130 Ї75 811209 150 :156 
40 :120 180 :114 1195) 8108) 
45 :074 185 :160 160 :161 
50 :015 190 :146 165 :168 
55 :202 195 :164 170 :123 
60 :153 200 :118 175 6132 
65 :032 205 :241 180 :132 
70 :067 210 :042 185 :141 
75 :243 215 :235 Тор” 2121 
80 :033 220 :202 195 :211 
85 :191 225 :207 200 :127 
90 :098 230 :032 205 :206 
95 :121 235 :114 210 :118 
100 :222 240 :015 2 15 gis 
105 :092 245 :251 220 :128 
110 :244 250 :176 225 :159 
115 :220 255 :092 230 :172 
120 :106 260 :035 233 :088 
125 :198 265 :141 235 :060 
130 :051 270 :200 240 :135 
1351221211 275 :134 295 :227 
140 :220 280 :238 300 :042 
145 :155 285 :229 310 :116 
150 :151 290 :056 euo ge 
155 :151 295 :113 320 :147 
160 :238 300 :105 325 :015 


570 :219 750 :027 
575 :095 755 :042 
580 :157 760 :248 
585 :008 765 :001 
590 :090 770 :248 
595 :245 775 :255 
600 :082 780 :143 
605 :215 785 :250 
610 :059 790 :042 
615 :124 795 :071 
620 :061 800 :060 
625 :178 805 :119 
630 :044 810 :047 
635 :040 815 :118 
640 :252 820 :192 
645 :204 825 :099 
650 :152 830 :024 
655 :163 835 :161 
660 :070 840 :160 
665 :101 845 :164 
670 :246 850 :125 
675 :030 855 :153 
680 :209 860 :154 
685 :124 865 :149 
690 :025 870 :000 
695 :118 875 :206 
700 :217 880 :213 
705 :238 885 :222 
710 :190 890 :225 
715 :163 895 :085 
720 :156 900 :096 
725 :028 905 :107 
730 :090 910 :105 
735 :073 915 :112 
740 :141 920 :110 
745 :221 925 :117 
Cylon Zap (64) 
100 :070 330 :* 
125 :054 340 :249 
130 :252 350 :221 
140 :078 360 :* 
145 :200 370 ;* 
150 :007 380 :058 
160 :181 390 :124 
170 :172 400 :219 
180 :011 410 :005 
190 :087 420 :151 
200 :155 430 :147 
210 :243 440 :239 
220 :199 450 :174 
230 :028 460 :206 
240 :200 470 :136 
250 :141 480 :112 
260 :069 490 :222 
270 :040 500 :141 
280 :* 510 :155 
290 :012 520 :123 
300 :141 530 :242 
310 :* 540 :048 
320 :* 550 :237 
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560 :217 ТҮЗӨ ЕЗ ШЕ) IT745 5p21 2270 :234 12 :046 72 :166 


570 :218 1140 :146 1750 :175 2280 :158 ШӘ 2122 80 :242 
580 :040 1150 :017 1779 :183 2290 :015 14 :174 90 :017 
590 :110 1160 :247 1780 :130 2300 :023 15 :169 92 :081 
600 :007 1170 :020 1790 :123 2310 :236 16 :180 93 :006 
610 :239 1180 :181 1800 :169 2320 :205 20 :027 94 :0й01 
611 :001 1190 :097 1810 :194 2330 :177 21 :125 104 :189 
620 :186 1200 :147 1820 :211 2340 :169 22 :029 106 :002 
630 :098 1210 :049 1830 :226 2350 :072 23 :127 108 :082 
640 :046 1220 :057 1840 :190 2360 :134 58 :075 109 :087 
650 :148 1230 :057 1850 :017 2370 :023 51 :071 110 :085 
660 :212 1240 :068 1860 :128 2380 :067 52 :141 111 :048 
670 :142 1250 :106 1870 :220 2390 :158 54 :199 150 :058 
680 :242 1260 :207 1880 :150 2400 :148 55 :012 152 :032 
700 :104 1270 :210 1890 :082 2410 :033 56 :028 154 :* 
710 :044 1280 :213 1900 :064 2420 :036 58 :172 156 :244 
711 :160 1290 :216 1910 :216 2430 :185 60 :132 158 :186 
712 :099 1300 :222 1920 :172 2440 :032 62 :063 160 :117 
720 :225 1310 :227 1930 :157 2450 :080 64 :141 164 :х 
721 :140 1320 :232 1940 :250 2460 :093 66 :199 166 :144 
730 :227 1330 :237 1950 :223 2470 :006 68 :255 168 :046 
735 :131 1340 :167 1960 :125 2480 :061 70 :213 170 :111 
790 78 1350 2034 1970 :197 2490 :096 

: 1360 :183 1980 :017 2500 :204 
770 :126 1370 :039 |1990 :128 2510 :087 September 
780 :222 1380 :175 2000 :190 2520 :% 
790 :128 1390 :245 Demon Star: 
800 :051 1400 :177 
810 :218 1410 :241 Main Program (VIC) 
820 2118 1420 :012 1 :010 35 :@55 
825 :071 1430 :136 2 :187 36 :229 
830 :012 1440 :202 3 :068 37 :228 
835 :176 1450 :130 4 :074 38 :216 
840 :113 1460 :246 5 :012 39 :215 
845 :057 1470 :103 6 :057 40 :202 
850 :162 1480 :173 7 :108 41 :146 
855 :009 1490 :222 8 :179 42 :235 
860 :116 1500 :166 9 :162 43 :083 
865 :065 1510 :247 10 :068 44 :009 
870 :008 1520 :199 11 :226 45 :027 
875 :160 1530 :054 12 :068 46 :186 
880 :055 1540 :032 13 :002 47 :108 
885 :158 1550 :083 14 :209 48 :151 
890 :017 1560 :100 15 :073 49 :082 
895 :120 1570 :253 16 :130 50 :195 
900 :052 1580 :205 17 :147 51 :224 
905 :137 1590 :023 18 :249 52 :087 
910 :030 1600 :033 20 :204 53 :184 
915 :146 1610 :163 21 :088 54 :250 
920 :174 1620 :097 22 :142 55 :036 
925 :113 1630 :250 23 :099 56 :096 
930 :126 1640 :202 24 :147 57 :167 
935 :004 1650 :023 25 :013 58 :065 
940 :153 1660 :250 2 "26 :099 59 :069 
1000 :0004 1679 :961 | Тһе Beginner's 27 :124 60 :193 
1060 :184 1680 :113 E 28 :140 61 :033 
1070 :231 1690 :000 Corner: Keyboard 29 :139 62 :208 
1080 :165 1700 :199 2 :219 7 :068 30 :189 63 :252 
1090 :239 1710 :112 3 :067 8 :251 31 :234 64 :026 
1100 :098 1720 :244 4 :077 9 :073 32 :005 65 :241 
1110 :194 1730 :053 5 :086 10 :032 33 :007 66 :229 
1120 :202 1740 :108 6 :203 lab ЕП? 34 :094 67 :018 
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87051: 027 1010 :030 1740 :199 6030 :248 


880 :028 1020 :088 3000 :187 6040 :201 
890 :203 1030 :068 3010 :241 6100 :250 
900 :021 2000 :013 3020 :108 6110 :195 
910 :132 2010 :142 3030 :019 10000 :135 
Demon Star: 920 :071 2020 :138 3100 :189 10010 :080 
930 :134 2030 :199 3110 :238 10020 :104 
Data File (VIC) 940 :233 2040 :143 |3120 :102 10030 :218 
10 :120 160 :226 950 :218 2050 :127 3130 :020 10040 :235 
20 :247 170 :219 960 :235 2060 :144 3200 :091 10050 :101 
30 :200 180 :235 970 :187 2065 :098 3210 :208 10060 :221 
40 :255 190 :177 980 :012 2070 :169 3220 :240 10065 :188 
58 :012 200 :248 990 :136 3000 :018 3230 :108 10070 :122 
60 :074 210 :115 1000 :170 3240 :090 10080 :141 
100 :009 220 :127 3250 :176 10090 :167 
110 :183 230 :242 Potholes: 2880 aes ae d 
: 2 :043 : : 
E oe о Initialization (VIC) |2010 :16 10120 :233 
140 :066 260 :231 10 :183 130 :004 4020 :045 10130 :085 
150 :128 999 :130 20 :219 140 :062 4030 :239 10140 :196 
30 :023 150 :000 4031 :169 10150 :202 
40 :089 160 :063 4040 :220 10200 :056 
Demon Star (64) 50 :054 170 :252 4050 :196 10210 :037 
90 :230 480 :033 60 :035 180 :253 4060 :106 20000 :216 
100 :181 490 :032 70 :092 190 :254 4070 :210 20010 :159 
110 :086 500 :002 80 :025 200 :064 4071 :115 20020 :204 
120 :080 510 :001 90 :005 210 :003 6000 :181 20030 :104 
130 :181 520 :048 100 :015 220 :098 6010 :142 20040 :194 
140 :071 530 :248 110 :124 230 :247 6020 :253 20050 :215 
224 ne 540 :030 129 :204 250 :101 
: 550 :083 
ate Oe 55044442 ` Potholes (64) 
180 :164 579 :129 ' | Potholes: 70 :190 510 :123 
190 :180 580 :073 Main Program (VIC) 80 :123 520 :027 
200 :062 590 :159 90 :079 530 :214 
210 :123 600 :193 100 :152 570 :168 SI g TAS 540 :082 
220 :119 610 :175 110 :057 580 :234 92 :009 550 :199 
230 :007 620 :040 308 :176 600 :047 93 2186 560 :085 
240 :250 630 :004 312 :014 610 :128 94 :074 570 :168 
250 :182 640 :137 320 :019 628 :162 95 :241 580 :125 
260 :102 650 :030 330 :019 630 :198 96 :072 600 :047 
270 :161 660 :096 340 :022 1000 :192 99 :058 610 :128 
280 :130 670 :130 350 :120 1010 :051 110 :057 620 :162 
290 :021 680 :142 360 :179 1020 :130 300 :176 630 :198 
300 :003 690 :229 370 :202 1040 :094 310 :011 1000 :192 
310 :020 700 :239 400 :207 1050 :086 320 :019 1010 :051 
320 :101 710 :111 402 :@51 1060 :195 330 :023 1020 :130 
330 :139 720 :246 403 :104 1100 :229 340 :024 1040 :094 
340 :193 730 :111 405 :201 1110 :037 350 :120 1050 :086 
350 :159 740 :252 410 :185 1120 :164 360 :170 1060 :195 
360 :198 750 :075 420 :186 1200 :207 370 :202 1100 :229 
370 :064 760 :219 430 :178 1210 :129 400 :207 1110 :037 
380 :150 ПТО 2233 440 :170 1220 :041 402 :051 1120 :164 
390 :175 780 :067 450 :120 1230 :166 403 :104. 1200 :254 
400 :191 790 :107 460 :174 1500 :014 405 :201 1210 :129 
410 :190 800 :155 500 :045 1510 :156 410 :185 1220 :041 
420 :035 810 :199 510 :123 1520 :132 420 :186 1230 :166 
430 :029 820 :008 520 :027 1530 :201 430 :178 1500 :014 
440 :056 830 :074 530 :214 1700 :010 440 :17@ 1510 :156 
450 :101 840 :184 540 :082 1710 :007 450 :120 1520 :132 
460 :107 850 :190 550 :199 1720 :015 460 :174 1530 :201 
470 :106 860 :081 560 :003 1730 :103 500 :045 1700 :010 
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1710 :007 10000 :135 
1720 :015 10010 :080 
1730 :103 10020 :104 
1740 :199 10030 :218 
3000 :187 10040 :235 
3010 :028 10050 :101 
3020 :148 10060 :221 
3030 :166 10065 :188 
3100 :189 10070: :122 
3110 :026 10080 :141 
3120 :148 10090 :167 
3130 :167 10100 :010 
3200 :091 10110 :051 
3220 :190 10120 :233 
3230 :053 10130 :085 
3250 :170 10140 :196 
4000 :008 10150 :249 
4001 :186 10200 :056 
4010 :169 10210 :037 
4020 :045 20000 :216 
4030 :239 20010 :110 
4031 :160 20020 :204 
4040 :220 20030 :104 
4050 :196 20040 :194 
4060 :106 20050 :215 
4070 :210 30000 :087 
4071 :115 30010 :088 
6000 :181 30020 :089 
6010 :142 30030 :164 
6020 :194 30040 :103 
6030 :248 30050 :198 
6040 :201 30060 :091 
6100 :250 30070 :145 
6110 :195 

Checkbook Reporter 
20 :066 80 :201 

23 :043 83 :035 

26 :204 86 :056 

29 :084 89 :150 

30 :240 90 :147 

32 :143 91 :209 

35 :187 92 :027 

36 :246 96 :252 

37 :247 97 :240 
381579 98 :063 

40 :241 101 :188 
41 :160 104 :255 
42 :243 107 :182 
44 :181 110 :026 
47 :207 113 :162 
50 :028 116 :046 
53 :216 119 :040 
54 :095 122 :194 
55 «061 125 :109 
56 :063 128 :114 
57 :101 13] :% 

58 :103 134 :219 
71 :138 137 :099 
74 :022 140 :092 
77 :146 143 :191 
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146, :025 186 :100 
149 :010 188 :085 
152 :042 191 :077 
153 :138 194 :084 
155 :102 197 :085 
158 :070 200 :144 
161 :029 203 :102 
164 :034 206 :085 
167 :075 209 :108 
170 :018 2112 ПӘЛІ! 
173 :123 215 :119 
176 064 218 :017 
179 :221 221 :214 
182 :058 224 :205 
185 :234 227 :160 
States % Capitals 
Tutor: Main Program 
5 :149 195 :130 
10 :033 200 :026 
15 :019 205 :198 
20 :212 210 :095 
25 :082 220 :145 
30 :236 225 :008 
35 :240 230 :039 
40 :011 235 :102 
45 :097 259 :204 
48 :231 255 :141 
50 :168 260 :241 
55 :218 300 :117 
60 :105 305 :010 
65 :150 310 :085 
70 :241 ento "gi 
100 :209 320 :059 
TOSES T22 325 :089 
110 :013 330 :193 
1152 0255 335 :089 
120 :218 340 :097 
125 :102 400 :001 
130 :024 405 :054 
140 :216 408 :056 
145 :121 410 :077 
150 :069 415 :060 
ДУБ ӨМ, 430 063 
170 :199 435 :018 
175 :184 440 :251 
180 :010 445 :093 
185 :015 450 :059 
190 :215 


October 


Aardvark Attack 
10 :121 19 :004 
12 :138 20 :097 
14 :006 22 6133 
15 :251 23 :073 
16 :173 24 :245 
18 :134 25 :189 


30 :003 319 :088 
32 :183 320 :117 
40 :006 321 :095 
45 :220 322 z ШЕ 
48 :186 ejos Bil sis) 
50 :077 324 :133 
53 :220 326 :026 
755: 328 :063 
58 :246 800 :182 
60 :214 801 :130 
63 :241 805 :203 
70 :063 810 :025 
YA 32858) 815 :088 
74 3249 820 :136 
80 :024 825 127 
9232139 898 :128 
84 :057 899 :031 
86 :185 900 :160 
90 :167 910 :193 
98 :229 920 :029 
99 :026 925 1931 
100 :074 930 :114 
ios. Бен! 940 :119 
АК 2119 950 :024 
120 :186 955 :009 
130 :082 960 :248 
140 :122 961 :066 
150 :210 970 :128 
160 :254 994 :070 
170 :086 995 81$ 
180 :011 999; :139 
190 :075 1000 :090 
200 :041 1001 :066 
210 :176 1002 :075 
220 :110 1003 :026 
ЖАТ Bass) 1004 :042 
222 :034 1200 :218 
223 :134 1210 :202 
230 :099 1220 :146 
240 :126 1230 :125 
250 :201 1240 :026 
260 :234 1250 :050 
280 :225 1260 :025 
299 :027 1270 :195 
300 :097 1280 :171 
Word Match (VIC) 

1 :190 38 :021 

2 :243 39 :232 

3 2 Ш6З 40 :067 

4 :139 41 :123 
10 :104 42 :227 
12 :192 43 :084 
ЗУ ЛЕ]: 44 :087 
20 :028 45 :168 
30 :074 47 :124 
32 :207 50 :223 
337 “152 51: 222157 
35 :024 52 :236 
36 :191 53 :201 
37 :144 54 :124 


55 :077 153 %122 
56 :013 154 :026 
60 :084 155 :098 
62 :199 156 :103 
64 :214 160 :231 
66 :191 162 :100 
70 :149 200 :214 
[Л 21576) 2050 :135 
74 :238 210 :056 
80 :072 211 :185 
81 :102 212 :189 
100 :143 215 :003 
105 :092, 220 :178 
110 :226 225-2018 
«i5. 219 230 :072 
117 :022 231 :015 
120 :087 232 :078 
121 :080 235 :086 
122 2189 237 :242 
123 :055 238 :212 
124 :238 240 :097 
125 :060 300 :216 
126 :097 305 :175 
1277: $199 306 :004 
128 :065 307 :159 
129 :247 308 :161 
130 :186 309 :165 
131 :239 310 :052 
132 :015 311 :037 
135 :130 312 :233 
“136 :037 314 :102 
137 :020 400 :112 
138 :015 1000 :016 
139 ;220 1005 :155 
140 :069 1040 :100 
150 :083 1050 :200 
151 :165 1060 :068 
152 :249 1065 :069 
Word Match (64) 
100 :009 250 :118 
110 :254 260 :174 
120 :073 270 :022 
130 :155 289. :186 
140 :212 290 :138 
145 :252 300 :210 
150 :161 310 :165 
160 :039 320 :015 
161 :048 330 :009 
162 :160 340 :028 
163 ОЗ 350 :249 
164 :063 360 :172 
165 :243 370 :125 
170 :127 380 :061 
180 :* 390 :138 
190 :204 400 :253 
200 :066 410 :001 
210 :019 420 :011 
220 :186 430 :197 
230 :х 440 :224 
240 :018 450 :028 


TALK OR SING-The "64" responds 


IN YOUR OWN VOICE 


Enter up to 150 of your own words and phrases. 
Compute response with BASIC. Store word sets on. 
tape or disk for unlimited selections. Easy for anyone 
to set up and use. Complete with cassette software 
(transferrable to disk) with demonstration programs 
for talking clock, calculator, and black jack. How to 
define every key as a spoken phrase or song note or 
other sound. There are so many applications and 
special effects it boggles the mind! Soon available 
for other popular computers. Software for word 
recognition to be available. 


UNDER $70 
ASK YOUR DEALER 


WE CAN DEMONSTRATE 
OVER THE TELEPHONE!! 


COVOX CO. 

675-D Conger St. Eugene, OR 97402 
Tel: (503) 342-1271, Telex 706017 
Check, money order, or VISA/MC 
(Dealer inquiries invited) 


460 :122 831 :052 
470 :* 832 :162 
480 :154 833 :155 
490 :099 834 :245 
500 :229 835 :108 
510 :217 836 :247 
520 :163 837 :107 
530 :092 838 :002 
540 :146 840 :193 
550 :199 850 :197 
560 :065 860 :009 
510 253 870 :189 
580 :065 880 :025 
590 :154 890 :181 
600 :200 900 :018 
610 :066 910 :178 
620 :253 920 :087 
630 :196 930 :254 
640 :247 940 :212 
650 :020 950 :108 
660 :133 960 :228 
670 :186 970 :183 
680 :023 980 :012 
690 :018 990 :167 
700 :214 1000 :199 
710 :079 1010 :203 
720 :131 1020 :099 
730 :136 1030 :084 
731 :051 1040 :075 
732 165 1050 :195 
733 :099 1060 :172 
734 :106 1061 :096 
ЗБ 1: 253 1062 :211 
740 :252 1063 :146 
750 :115 1064 :060 
760 :029 1065 :172 
770 :101 1070 :015 
780 :106 1080 :166 
790 :243 1090 :110 
800 :102 1100 :201 
810 :221 1110 :200 
820 :138 1120 :064 
830 :046 @ 
Ts 


COMPUTE! 


GAZETTE 
TOLL FREE 
Subscription 
Order Line 


800-334-0868 
In NC 
919-275-9809 


52-2. 


МОМЕҮ ВАСК 


GUARANTEE! 
SOFTWARE FOR THE 64 


If you are not satisfied, send us back the 
program within 30 days for a prompt refund! 


ТАРЕ 22.95 
TYPING COACH DISK | 2495 
Impress everyone with how quickly you've 
mastered typing. Typing Coach teaches from 
beginner to most advanced using games, typing 
drills and friendly timed tests. 


TAPE 24.95 
FINANCIAL GENIE — oisk 2695 
The most complete financial program available for 
the home. It's easy, and solves every need 
including budget, savings and loan calculations 
and checkbook balancer. 


TAPE 22.95 
CHECKBOOK 64 DISK 2495 
Guaranteed to find money in your budget. 
Complete record keeping system for all 
transactions, cash or check. Sorts into over 100 
categories. Quickly pays for itself. 
Satisfaction Guaranteed or return within 
30 days for a prompt refund. 


Add 2.00 handling 
Add 2.00 for C.O.D. 
Specify tape or disk. 


Software Town 
P.O. Box 43 
Magna, UT 84044 


Mastercard, Visa, C.O.D. 
Call us, we'll ship tonight! 


(801) 250-2280 


All orders shipped within 24 hours. 


COMPUTE!’s Gazette April 1984 171 


TREASURE 52.97 tape for 
vic 20™ 


FOR YOUR МІС - 20” 3 nm. 


For You Who Care Enough To Use The Best H 


24K RAM RS-232 CARD | МОТНЕН ВОАНОЯ 


Single board for all|* True RS-232signallev- |е» Adds 4 slots to the B 
RAM expansion uses} els provide maximum memory expansion 
only one slot compatibility with port 

peripheral devices 
Low power consump-|* Duel output connec- [е Includes ЗК of RAM 
tion provides cool, tors make installation 
reliable operation and a snap 
extended product life 


Fully VIC-20 compati-|* Fully compatible with |е A socket for a 2764 $ 
ble VIC-20 hardware and EPROM Modular B 


software power supply to re- Ш 
Available in 8K, 16K, duce the load on your 
24K configuration VIC 


$199.24 $49.32 $69.64 


uses joystick, no expansions 


TAXI 
— еш DRIVER 


READING 
DEVELOPMENT 


$12.97 disk for 


Commodore 647М 


uses paddles 
ALL PRICES ARE FOB SANTA CLARA 


a 
ш 
a 
- a 
FALLMAR< COMPUTER PRODUCTS, iNC. a 
п 2565 Scott Blvd., Santa Clara, СА 95050 H| vic 20 and Commodore 64 
m Phone (408) 748-9208 Ш| are trademarks of 
m Commodore Electronics Ltd. 
Ш Gold-plated contact fingers for long-lasting solid connection. B 
H ARK INNOVATIONS, INC. 
[] ALL PRODUCTS ARE SUPPORTED BY A 2 YEAR WARRANTY! = 18133 School St. 
DEALER DISTRIBUTOR INQUIRIES INVITED Box 15 5 
VIC-20 is a trademark of Commodore Business Machines, Inc. Amador City, ca 95601 


COMMODORE 642 SOFTWARE 


Beach-Head ....... 26.95 Intro to Basic 1 (С)19.35 Loan Analyzer .... (С)10.15(0)13.50 Time Money Шо 2...00)51.00 Type Attack --.(D)27.00 
Neutral Zone. i 26.95 Screen Editor (0)16.90 Moondust -(CT23.65 Omniwriter..... 54.95 Way Out 5 27.00 


‘Avalon Hill Super Expander VSP .....(СТ)19.50 Astroblitz 2... (СТ)23.65 Omni Calc сез... (D)S8.25 Critical Mass ......... 27.00 


The Manager ............(Р)43.00 Trashman ..... (CT)23.65 Type 'N Мгіег..............24.20 
Telengard (C)16.75(D)20.50 Simons Basic...... :00)19.50 Save New York .........(CT)23.65 Synthesound 64 ..........(D)2S.S0 SPlnnaker 
B-1 Bomber ......(C)11.75(D)15.30 Music Machine. (CT)16.90 Cyber [NUR ee gigs Face Maker ..............(D23.65. 
Nukewani (ОП-75 Music Composer (D)16.90. Cyberchess 2) 34.95 Hes Writer 64...........(CT)30.45 Hey Diddle Diddle 404040 
Midway Campaign . (C175 Kindercomp -..()20.30 
ТАС. (D)28.00. Word/Name Machine . .. ..(D)16.90 Cymbal Gridrunner . (СТ)20.25 С А (D)27.00 
У Zortekand ће English/Spanish ............34.95 Benji Space Rescue (D)30.45 p ра yata 
Computer Mieroetips, (C)24.80 Б Fraction Fever ... (D)23.65 
Football (©)11.75(D)15.30 | г} OG dps EO Mer earn Amazing Thing (D)27.00 
х inventory Mgmt. :00)43.00 Science 34.95 
Flying Ace (C)19.00 Payroll/Checkwriting (D)43.00 jj fs a Jage SAT English... 22.75 Alphabet Zoo ........ 23.65 
Stocks and Bonds . +. (C)1S.00 AC Payable (D)43.00 FICA SERE) og SAT Math I... 122111272275 Kidson Keys .... 23.65 
TG ESU (€)15.00(D)18.25 Bayan Мне солдан En EE ain Epp 30.30 Delta Drawings .. 2725 
Accts. Receivable ....(0)043.00 Mathematics. 3495 ГТ КУЗ ургы 53 
Broderbund Gen. Ledger (D)43.00 Trivia ЖАҒЫ Асры p for Grabs 27: 
Choplifter .(CT)27.00 Nevada Cobol ` (D)47.90 E Floyd of the Соат prd 265 
Sea Fox S (СТ)27.00 Magic Desk...... (С7)74.95 Jungl (D)23.95 Ар, 
Moonshuttle (р,С)20.30 Jungle ..... Š o 
Serpentine....... (СТ027.00 Zork (1-3) ЕРТЕСІ DY [D.O020.30 Hellcat Ace (D)23.9s Aerobics E 30.98 еш... 
p Suspended. .... 200)29.50 Genesis -.(D)27.00 Solo Flight 26.95 Ft Apocaly (D.C)23.70 
Magic +s ss; (0027.00 Starcross (002950 O'Riley’ Mine (D)20.30 Nato Commander. .. npo Hes pue DO 
AE 27.00 Deadline 3129150) price ves 2700 Wingman .. 2695 Бапан oe tp ao Bee 27 
cps Wizard of Wor (СТ21.50 вру, Ming Alley Асе 26.95 Бше Мах (п. 6232 
тл 55.55 бо. (СТт)21.50 EP. imension Х..... (D,C)23.70. т 
Frantic Freddy ..............2695 бой... (2150 Рим GIGI а йы 551 BASF 5% 
D. 226,95 БАТЫ 3 (612455 Temple of Apshai.... (D)27.00 Frogger МА (D.C)23.6S Combat Leader (D)29.00 SSDD 2 Рак.....5.50 
ами ots Mer: Upper Reaches З (D)20.30 Knights of the Desert (D)29.00 BASF 
Assembler (р)! ЕД Continental of Apshai...............(D)13.55 Sammy Lightfoot .. (0)21.80 Computer Baseball. (D)29.00 Soft Box (10) . ..23.80 
Bonus Pack с (D.C)16.90 Home Accountant 50.75 Curse of Ra .... ++. (D)13.SS Threshold .......(D)21.80 Eagles. 22... (D)29.00 КУ ка 
eodewniten (DY47. "0 Тах Advanta; 40.60 Sword of Fargoal (D)20.30 Lunar Leeper. (D)21.80 Ring Side Seat (D)29.00 Joysticks 
eee sm e s AGED CES TER (D.C)27.00 B.C. Qst for Tires .. (D)25.50. Timeworks Pointmaster ....10.95 
Easy Mail 64... (D)16.90 Creative Software Сога _„ Os Well ss (D(21.80 Dungeons of Ы Pointmaster Pro .18.55 
y Apshai . (D)27.00 Learning W/Lecper (D)21.80 Dragons. (D,C)19.10 " 
Easy Spell 64 (D)16.90 Spitball 23.65 7 Li р‹ : Fire Control ..... 7.85 
y Sp p Exidy Arcade Classics 27.00 cia бөрте Robbers of the. р 
Easy Calcó4 ... + «+, (D)73.75 Pipes Jumpman Jr. ...... (CT)27.00 ТЕК are (рт. Lost Tomb . (D.C)19.10. Wico 
Easy Lesson/ Quiz (Ше Decision ОКУ UD Software E Крузо Wall Street ..........(р.Слөл0 Command Сїт... 19.50 
Easy Finance (1-8) RE cast NG) 13.50 Hes Mon 64 (CD27.00 Squish Em 1 (0)23.65 Money Manager (0.01910 Ñ Wico “Bass” ...13.50 
Logo ў Кранае су1з.5о(ру1в.ао Turtle Graphics П (СТ40.60 Repton (D)27.09 Electronic 
Pilot. (D47190 Finance ТШЕ: 3) Attack of the Blade of DIM Soale (D)27.00 Checkbook... (D.C)19.10 
Pet Emulator (D)16.90 Home Inventory . . (C)10.15(D)13.50 “Mutant Camels (ст)20.45 poole ...... Word Pro 3-+ бш 


Terms and Ordering Information: To order call 1-800-527-8698 and send certified checks, money orders or personal checks [allow 2 weeks to clear], or use your 
Visa, Master Card or American Express. Inside Texas call 1-800-442-8717. Include 32 for P & H [C.O.D. orders add $1.65] UPS Blue Label $4, Canada 56 call 
for shipping charges on Hardware. Other countries include 10% for P & H. All products factory sealed with manufacturer's warranty. All returns require 5 
R.A.#. Prices subject to change without notice. Order desk hours: Mon-Fri 9-6, Sat 9-1 CST. Numeric Keypad 30.25 


ATARI, APPLE, VIC 20, T.L,SOFTWARE LISTS AVAILABLE gala 
For further information and inquires call 214-753-0485 SO А (ате! Р0. BOX 2511 еве нал 
FOR ORDERS ONLY CALL TOLL FREE , GEMINI PRINTERS 


Outside Texas Inside Texas Wares. 9939 9 guile? LONGVIEW, TX оте 


1-800-527-8698 1-800-442-8717 = ә шы 7506 матн 


5 Slot Expansion. 60.50 


AIR 
of the 


] IZARDNMEN 


In an abendoned corner of desert lie 
ancient, unsolved mysteries. 

Danger, death and forgotten treasure 
await you in 


LAIR OF THE LIZARDMEN 
text adventure for C-64 or VIC-20 
(VIC requires 8k expansion) 
Specify disk or tape, VIC or 64 


$15.00 disk or tape. Add $1 shipping. 
California residents add 6X7 tax. 
WEREWOLF SOFTWARE 
109 Minna Street 


Suite 353 
San Francisco, CA 94105 


FREE GAME FOR 
YOUR COMMODORE ó4 


That's right! If you'll help cover shipping costs, 
KIDware will send you a free game along with our 
latest program brochure. The cassette-based 
game, FOUR-IN-A-ROW, lets 2 players compete 
at trying to line up four pieces on a playing grid. 
Its fun for the whole family! 


KIDware specializes in KID-oriented software 
(Cassettes and Disks) for the Commodore 64. We 
offer a wide range of fun, educational programs 
for kids 1 - 16 years of age, with emphasis in the 
younger years. Our prices are the lowest and 
our quality and service the best——-you get same 
day shipping on all orders! 


To receive your game tape and program brochure, 
send $1.50 (for shipping) to KIDware. If you 
jonly want a brochure, simply write and ask. 


КІШ 
p.o. box 1664 


idaho falls, 
idabo 83401 


Systems Іп Boor 


SOFTWARE DEVELOPMENT AND DISTRIBUTION ДЖ) 
—== PRESENTS = 


THE FIVE ADVENTURES THAT WILL DEMAND QUICK 
REFLEXES OF THE MIND. NOT THE HAND! 


* ROCKET V-2 only $15.95 
DR. GEARDORF'S LASER only $15.95 
° THE ISLES OF SSENKRAD 

(Part 1) only 515.95 
° BENEATH THE ISLES OF 
only $15.95 
only $18.95 


SSENKRAD (Part 2) 


* SAND SCREAM 
(Graphics for the C-64 that you must see) 


We Accept Mastercard/Visa, Certified Check, M.O., 
Allow 2 wks. for Personal Checks. 

VIC-20 Requires Minimum 8K Expansion (ATARI, TRS-80 
Versions Coming Soon) 

Add $2.00 for Disk, Add $1.50 for Postage/Handling 
RUSH ORDER TO: SYSTEMS TO BOOT . 2109 S. 
Fieldcrest * Р.0. Box 4106 * Wichita, Kansas 67204 


*ATARI, Commodore, TRS-80 are all registered trademarks re- 
spectively 


VIC-20 / C-64 USERS 
CARTRIDGE BACK-UP 
ө SYSTEM IS AN EASY TO USE PROGRAM 
AND A HIGH QUALITY CARTRIDGE INTER- 
FACE BOARD 
Ф BACK-UP YOUR CARTRIDGES ONTO 
TAPE OR DISK 
ө ЗК RAM (MIN.) REQUIRED FOR VIC-20, 
ON BOARD FOR C-64 
VIC-20:$49.95 POST PAID 
C-64:$89.95 POST PAID 
CASSETTE BACK-UP. 
€ EASY TO USE PROGRAMS 
€ BACK-UP ANY CASSETTE TAPE ONTO 
TAPE 
ө REQUIRES NO USER MEMORY 
VIC-20:$14.95 POST PAID 
C-64:$14.95 POST PAID 
NOW CARRYING OTHER EQUIPMENT 
PLEASE CALL OR WRITE FOR PRICE LIST 
OF COMMODORE COMPATIBLE EQUIPMENT 
AND SOFTWARE 
VISA/MASTERCARD ORDERS: 
PHONE (215) 269-4803 
MAIL CHECK OR MONEY ORDER TO: 
E-M TECHNOLOGIES 
P.O. BOX 185 
DOWNINGTOWN, PA 19335 
PA. RESIDENTS ADD 696 
6 MONTH REPLACEMENT GUARANTEE 


TRANS-TERM 2.0 


COMMUNICATIONS PACKAGE 


AUTOANSWER, AUTODIAL 
CREATE, SEND, RECEIVE FILES 
DOWNLOAD TO DISK AND PRINTER 


$34.95 
HOME INVENTORY 


PERSONAL MANAGEMENT TOOL 


FILE AND RETRIEVE IN 
UP TO 9 CATEGORIES, 
PRINTS REPORT WITH TOTALS 


$19.95 
DayProm 


cornputer, inc. 
3460 S. Dixie Hwy. 
Dayton, Ohio 45439 
(513) 299-8555 


For Commodore 64 with 
Disk & 1600 or 1650 Modem 


For Commodore 64 
with Disk 


DEALER CALLS INVITED! 
“REPS NEEDED!” 


COMPUTE!Ss 
Gazette 


ШОШ FREE 


Subscription 
Order Line 


800-334-0868 


In NC 919-275-9809 


DEVELOP YOUR CHILD'S 
SPELLING & MATH SKILLS! 

Make the drudgery of learning fun and easy 
with Spelling Tutor ІІ and Math Tutor II. A uni- 
que way to advance your child's ability in 
learning. 


MATH TUTOR II 
LANGUAGE TUTOR II 
SPELLING TUTOR П 


e Menu Driven * Data Base File 
* Create Student's Spelling 


A 
or Language Lessons NS 

* Addition/Subtraction «S 

* Multiplication/Division os 

* Tape $16.95 per program 


* Disk $18.95 per program 


Expansion Unit Unnecessary | Specify VIC-20 or C-64 
Also available, MSD Super Floppy Disk 
Full Line of MSD Products— Prowriter Printers 
— Send for FREE Catalog — 

VIC-20 CHECK OR MONEY ORDER С-64 

IL RESIDENTS ADD 6% SALES TAX 
SPH SOFTWARE 
R.R. #1 


E. PEORIA, IL. 61611 


FREE CATALOG ! 
HOME, ЕРОСАТІОМА 


BUSINESS SOFTWARE 
FOR THE VIC AND 64 


New Items... 
Checkbook/64 (Disk) Handles 
all checking account data. $16.00 
Capitals/64 Teaches U.S. and 
Foreign capitals. Disk $10.00 
Tape $8.00 


Over 50 other titles! 
Low-Priced! Practical! 

your VIC or 64 to work with 
quality software from 


Farthest Fringe S.A. 
101 Highway Blvd. 
N. Pekin, IL 61554 
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S ToP GAMBLING- ` 


Use your personal computer for expert 
handicapping like the experts do - - - 


© BASEBALL SYSTEM Complete game and pitcher match- 
up, strength and performance evaluation, strongest play 
rating. 


* USFL FOOTBALL SYSTEM predicts winning margin 
and total points. 


* BOTH SYSTEMS include situation analysis. trend 
analysis, and unique handicapping uides. Simple 
adio Shack, Apple. 


operating manual. Use with 
Commodore 64 and others. 


START WINNING WITH 


Send 5225. for either System includes free 
money mgt. program (worth $50.) Enclose 
check, money order or Visa/MC card No. 


* WRITE FOR MORE DATA FREE 


COMPUTER == 
HANDICAPPING ЕЕЕ 
SYSTEMS 


P.O. Box 33034 
Cleveland Ohio 


44133-0034 e Order today-Win tomorrow 


e 
VIC-20 INTERFACING BLUE BOOK ж 
Did you know that your МІС сап бе used to 
control а 996 toy motor so effectively that it 
runs like a precision machine? Or that you can 
build an accurate digital thermometer using 
the VIC and four parts costing less than $5? 

These and эпе nteracino projects 
selected for usefulneSS? ease of construction 
and low cost are detailed in the VIC-20 Inter- 
facing Blue Book, a veritable gold mine of prac- 
tical information on how to build a variety of in- 
terfaces for your computer. 

Projects include: Connecting VIC to your 
stereo; Pickproof digital lock; Capacitance 
meter; Liquid level sensor; Telephone dialer; 
Voice output; 8K/16K RAM/ROM expansio 
128K RAM expansion; 8-bit precision D/A; 8-bit 
AID converter; MX-80 interface and more. 

Written by a college professor in a friendly 
and informative style, the Blue Book gives you 
theory of operation, schematics, program 
listings, parts list, construction hints and 
sources of materials for each one of the 30 pro- M 
jects. 

If you want to get the most out of your VIC 
this book is a must. Cost is $14.95 (less than жа 
506 per project! Price includes postage. 


micrusignal Dept. С 


P.O. BOX 22 
MILLWOOD NY 10546 


DIA 0OZ-IA 0Z-3IA OZ-DIA 0Z-DIA 02 


VIC-20 VIC-20 VIC-20 VIC-20 VIC-20 VIC-20 VIC 
^ 00 


Advertise your 
program or 
product for the 
VIC-20 or 64 
here and reach 
hundreds of 
thousands of 
readers. 


VIC & 64 


LEROY'S CHEATSHEET " 


ONLY 5 3.95 еа 


AT LAST! The information you need. without always going 
k to the manual. These durable oated ove 
lays contain program starting locations, function key label- 

ing. commands and additional aids in center cutout 


ie send me the following Leroy's Cheatsheet 


20 
Programmers Aid’ D 


“ 
D Graphic printer (1515 12s)? 

Vicmon' n Paper Clip 

Super Expander' D Script 64 

Hesmon n HES Writer 

Calc Result (эке) ^ п Wordpro 3 plus 

Term 64 n Easy Script 


n о QuickBrownFox о о Basic NIE 


Send check or money order plus 51.00 (postage and handling) 
РА residents add 6% sales tax 


Name. 


Address. 


City. 


РО Box 8299 Pittsburgh РА. 15218 (412) 456-7420 


PROFESSIONAL FOOTBALL 


AN ADVENTURE TYPE GAME FOR 
Vic + 16K & Commodore 64 
Program Features 
11 Offenses & 11 Defenses 
Full Feature Scoreboard 
Includes down, distance, field 
position, clock, # Ist downs, 
and # timeouts. 
Computer selects its plays based 
on down, distance, field position 
& score & will run a 2 min drill. 
Sudden Death (for ties) 
Complete Statistics Given at Half 
and at end of game. 
* Includes Users Manual * 
(Cassette) 
$16.95 ppd 
eo Personal Checks Accepted 
VISA & MC Include Card # 
Exp. Date & Signature 
CMS SOFTWARE 
PO Box 4876 
Topeka, Kansas 66604—0876 


Database system for the Commodore 64 

* User defined printouts * 

* Menu Driven * 

* Sorts on any field * $27.50 
* Interfaces to other programs * 

* File & Retrive names, addresses, etc * 

* Can be used for business * 

* Easy to follow instructions * 

* This should be the first Database that you buy * 
40 Practical Programs - This disk forthe C-64 contains 
40 different programs used for both Business and 
Personal computing. Financial Ratio Analysis, 


Decision Analysis, and Home Budgeting plus 37 
others. $37.50 


Project Management - This disk system provides an 
integrated database with a critical path method and 
pert network analysis program. Used for scheduling 
and estimating the cost and time necessary for any 
project. $87.50 


Other Programs - Send for our complete list of low cost 
personal and business software. 


Computer Connection (512) 828-2073 
1780 Austin Highway COD Check or 
Bankcard 


San Antonio Texas 78218 


Quantity discuunts valable 
Dealer inquiries invited 


CONVERSE WITH 
YOUR COMPUTER 


AT LAST! A FULL IMPLEMENTATION of the original ELIZA pro- 
gram is now available to run on your Commodore 64! 


Created at MIT in 1966, ELIZA has become the world's most cele- 
brated artificial intelligence demonstration program. ELIZA isa non- 
directive psychotherapist who analyzes each statement as you type 
itin and then responds with her own comment or question -and her 
remarks are often amazingly appropriate! 


Designed to run on alarge mainframe, ELIZA has never before been 
available to personal computer users except in greatly stripped 
down versions lacking the sophistication which made the original 
program so fascinating 


Now, our new Commodore 64 version possessing the FULL power 
and range of expression of the original is being olfered at the intro- 
ductory price of only $25. And if you want to find out how she does 
it {or teach her to do more) we will include the complete SOURCE 
PROGRAM for only $20 additional 


Order your copy of ELIZA today and you'll never again wonder how 
to respond when you hear someone say, “Okay, let's see what this 
computer of yours can actually do!” 


ELIZA IS AVAILABLE IN THE FOLLOWING FORMATS: 
(Please specify Disk or Cassette) 
1. Protected Version 
(Protected Version can be run but not listed or modified) 
2.Un-protected Commodore 64 BASIC Source Version 
(Source Version can be listed and modified as well as run) 
Both versions include a six page user manual. 


Please add $2.00 shipping and handling to all orders 
(California residents please add 6% sales tax) 


ARTIFICIAL INTELLIGENCE RESEARCH GROUP 
921 North La Jolla Avenue, Dept. G 
Los Angeles, CA 90046 
(213)656-7368 (213)654-2214 
MC, VISA and checks accepted 


Ee 
VISA 
[sl 
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DISK DUPLICATOR 


FOR COMMODORE 
SINGLE DISK DRIVES 


(1540, 1541 and 2031 used with a 
VIC-20, commodore 64, CBM 4000 or 
CBM 8000 computer) 


DISK DUPLICATOR provides you a fast 
and easy way to make back-up copies of 
your precious, irreplaceable diskettes. En- 
joy the convenience of a dual disk drive 
without the expense. DISK DUPLICATORis 
100% MACHINE LANGUAGE, 100% FAST, 
and most importantly, 100% AFFORDABLE! 

Don't let an accident or mistake catch 
you without back-up copies of all your 
diskettes. ORDER "DISK DUPLICATOR" 
TODAY at the special introductory price of 
only $14.95 postage paid (check or money 
order only please). 


H&H ENTERPRISES DEPT. 1236 


5056 NORTH 41st STREET 
MILWAUKEE, WISCONSIN 53209 


Writers, 
programmers... 
COMPUTE!'s 
Gazette 
is looking for 
articles on the 
VIC and 64. 


Tired of just playing 
games? 


Challenge yourself to 
The Commodore 
Puzzle Book 
and get something out of 
having fun. 


The Commodore Puzzle Book, by 
Gordon Lee and Nevin Scrimshaw. 
Baffling brainteasers that also teach 
BASIC programming skills. 
For those who want only the 
best out of computing. 
Birkhauser Books. 


1983 / 144 pp. / Softcover / $7.95 
0-8176-3167-4 


Nov. 


Birkháuser Boston, Inc. 
380 Green Street, Cambridge MA 02139 
(617) 876-2335 


DEALER INQUIRIES INVITED 


INTRODUCING K-COVER AN ANTI-STATIC. 
UNBREAKABLE COMMADORE KEYBOARD 


PROTECTOR MADE OF ATTRACTIVESMOKED. 
GREY PLASTIC WITH MAR-RESISTANT RUB- 
BER FEET. K-COVER PROTECTS YOUR KEY- 
BOARD FROM DUST, DIRT, AND WANDER- 
ING FINGERS. K-COVER ALSO DOUBLES AS 
ATILT RISER FOR COMPUTER OR MONITOR 
ANDCOMESWITHLIFETIMEWARRANTY AGAINST 
BREAKAGE. ONLY $7.95 PLUS $1.00 POS- 
TAGE AND HANDLING. CHECK, MONEYOR- 
DER, VISA AND MASTER CARD ACCEPTED. 


PENGUIN PRODUCTS 


P.O. BOX 7008 
ROSEVILLE, MICHIGAN 48305-7008 


1 (800) 732-0614 
1(313) 293-5210 


ЖЕНІЛ С роману" 


ДРЕС me БЫЗ computers 
Written by users, for users 
Ж GAMES Ж UTILITIES Ж EDUCATIONAL Ж 


VIC 20" 


collection #1 — collection #2 — collection #3 
collection #4 — collection #5 — collection #6 
70+ programs per collection — Tape/Disk — $10.00 


COMMODORE 64" 
64 collection #1 — 64 collection #2 — 64 collection #3 
64 collection #4 — 64 collection #5 
25+ programs per collection — Tape/Disk — $10.00 


PET? / CBM? 
5 Utility — Tapes/Disks — $10.00 each 
11 Game - Tapes/Disks — $10.00 each 
6 Educational — Tapes/Disks - $10.00 each 


DINSET": Reset Switch 
Works on Vic 20 or Commodore 64 - $5.00 
All prices include shipping and handling. 


CHECK, MONEY ORDERS, 
VISA and MASTERCARD accepted. 


For A Free Catalog Write: 
Public Domain, Inc. 


5025 S. Rangeline Rd., W. Milton, OH 45383 
10:00 a.m. - 5:00 p.m. EST — Mon. thru Fri. 
(513) 698-5638 or (513) 339-1725 


VIC 207. CBM and Commodore 04 ws Tradamars of Cammadore Electrons Lid. 
PET" a Reo aaa Trademan oi Commodore бойле тр 
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COMPUTE!'s 
Gazette 


Toll Free Subscription 
Order Line 


800-334-0868 
In NC 919-275-9809 


Still investing in 
- neo-expressionist 
art? 
Tune into the 


art of the future — 
Computer Graphics. 


Graphic Magic, by R. Baumann. Shows 
the sophisticated computer user how to 
exploit the full graphic and animation 
potential of the Commodore 64. Illustra- 
tive programs included. Give your BASIC 
programming skills artistic expression. 


For those who want only the 
best out of computing. 
Birkháuser Books. 


180 pp. / Softcover 
0-8176-3193-3 


514.95 


1984 


Apr. 


Birkhauser Boston, Inc. 
380 Green Street. Cambridge MA 02139 
(617) 876-2335 


NEW C-64 
SAIL TO AMERICA 


A totally new computer experience 


Parents Tell your kids Cadmean's The Voyage of 
the Mayflower has all the color, sound and excite- 
ment they love. Challenge the mighty Atlantic, 
defy its roaring storms and bring your passengers 
safely to the new world. There's never been an 
experience like it. Anywhere. 


Kids Tell your parents The Voyage of the May- 
flower is a terrific learning adventure. Recreate the 
hazards and drama of the first Pilgrim voyage. 
Learn about sailing strategy, weather, navigation 
and history. The more you know the more fun it is. 
Every level is a unique experience whether you're 
8 or 60. Unforgettable. 


Families Pit your imagination against the world as 
the Pilgrims knew it. Share the exciting journey to 
a new life in a new land. Risk the danger and learn 
together how the Mayflower sailed into history on 
the courage of those few who dared. 

All this and a FREE 11 x 16 Poster for only $29. 

School and dealer inquiries welcomed 
DISK ONLY 

ORDER NOW. FREE shipping for MasterCard and 
Visa orders. Call (313) 994-0845 Day or Night. C.O.D., 
checks, money orders add $3.00 shipping. 
CADMEAN CORP., 309 Koch, Ann Arbor, MI 48103 


549.95 


+ SHIPPING 


COMMODORE OWNERS.... GET ORGANIZED!!! 
Micro-console puts it all together 


* Holds Keyboard * Holds Monitor 
* Holds 2 Disk Drives or Recorders 
* Hides Cable Mess 


* All Metal Construction Reduces 
Interference Between Peripherals 


* Attractive Finish Matches Vic and 64 


MICRO-CONSOLE 
(512) 964-2390 


Route5 Box925V Canyon Lake, Texas 78130 


EPROM PROGRAMMER 


FOR 
РЕТ“ COMMODORE-64'- VIC-20' 
DELUXE-INCLUDES: 


=MACH.LANG. MONITOR E 
=mini-ASSEM/EDITOR i  — 
*FILE MANAGER $99.50- 

for software development &EPROM coding. 
PROGRAMS OVER 40 popular device 
types including 25xx and 27xx series 
up to 32K BYTES (incl. some E? types). 
MENU DRIVEN software runs all 3 CPU's 
connects to USER PORT. L.I.F. socket incl. 


ECONOMY .-2716-65 
read.pgm, & ver. ONLY 
basic Drege am ewer 
editing &file storage 
ARE NOT needed-LIF incl. $59.90 * 


t PET, COMMODORE 64,8 VIC 20 are trademarks of CBM,INC. 


(215)256:6933 DAZcO (215)256:6933 


eS Box 267 Lederach, Pa. 19450 
**$2.ship. & Pa. res.add6% 


Has your valet 
left you to write 
a book on the 
Royal Family? 


Good help is hard to find 
but easy to program 
on the Commodore 64. 


Your Computer Butler, by Robert 
Tinker. A practical and lighthearted 
guide to cybernetics. Shows how to turn 
your Commodore 64 into a 
home-monitoring system. a personal 
message center, and more. 


For those who want only the 
best out of computing. 
Birkháuser Books. 


Маг 1984 / 180 pp. / Softcover / $14.95 / 
0-8176-3197-6 


Birkhauser Boston, Inc. 
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Telengard: How low can you до? 


We've created a subterranean monster. Fifty 
stories low. 

That's the number of levels in the TELENGARD 
dungeon. 


Each labyrinthine level holds hundreds of dark chambers 
and tomb-like corridors for the mighty adventurer to ex- 
plore. It goes without saying that a shifting collection of 
hideous monsters with unpredictable behavior patterns can 
make life in the TELENGARD maze quite interesting—and 
frequently quite short! 

Using wits, magic and true grit, your character delves 

deeper and deeper into the depths of TELENGARD in this 
realtime fantasy role-playing game. Available on cassette 
for Commodore? 64, Atari? Home Computers (40K), 
TRS-80® Mods. 1/11 (52K) and PET? 2001 (32K) for а 
ghoulish $23.00. 48K diskettes for Apple? II, Atari? , Com- 
modore® 64 and TRS-80? available also, for $28.00. 
AND FOR THOSE WHO DON'T DIG UNDERGROUND GAMES... 
There's B-1 NUCLEAR BOMBER, a nail-biting solitaire simulation 
of a manned B-1 on a mission over the Soviet Union. Your plane is 
equipped with six Phoenix Missiles, a one megaton warhead and 
orders to retaliate! Cassette for Commodore 64, Atari Home Com- 
puters (52K), TI99/4 & 4A (16K), VIC-20 (16K), Timex/Sinclair 1000 
(16K), and TRS-80 Mods. 1/1 (16K) are available for an explosive 
$16.00. Diskette versions for Apple (48K), TRS-80 (32K), Atari (24K) 
and IBM (48K) just $21.00. 


i Nukewar 


Deom 


QUALITY 


NUKEWAR: Defend your country by massive espionage efforts, or 
by building jet fighter bombers, missiles, submarines and ABM's. 
Your cold and calculating computer will choose its own strategy! 
Cassette for Commodore 64, VIC-20 (16K), TRS-80 Mods. 1/1 (16K) 
and Atari Home Computers just $16.00. 

FOOTBALL STRATEGY: Animated action on a scrolling field. A 
head-to-head challenge or solitaire as you select the best offensive 
or defensive plays in response to your opponent. Commodore 64, 
Atari Home Computers (32K) and TRS-80 Models I/III/IV (16K) 
cassette for $16.00. Atari (32K), IBM (64K) and TRS-80 Models 
I/III/IV (32K) diskettes available at $21.00. 


T.G.I.F.: Thank Goodness It's Friday! Avalon Hill's new party game 
for one to four players recreating an often-not-so-typical week in 
the lives of the working class. Half the fun is just making it from 
Monday to Sunday. Commodore 64, Atari Home Computers (40K) 
cassette for a meager $20.00. Atari diskette (48K) for $25.00. 
AVAILABLE WHEREVER GOOD COMPUTER GAMES ARE 
SOLD or call Toll-Free: 1 (800) 658-9292 for the name of a 
store near you. Ask for Operator C. 


micrecemputer games” 


a Division of the 


4517 Harford Road, Baltimore, MD 21214 U.S.A. Earth 


* Trademarks of Tandy Corp., Apple Computers, Commodore Business Machines, Warner 
Communications and International Business Machines. 


INDISPENSABLE 
SOFTWARE 


For Your Most important Computing Neecis 


(С commodore Се commodore 


EasyScript 64 EasySpell 64 EasyCalc 64 


The Manager SuperExpander 64 
Displays 764 lines x 240 20,000 word Master Multiple electronic spread- Sophisticated database 21 special commands. 
characters. Prints to 130 Dictionary and automatic: Sheet with color bar graph system with 4 built-in appli- ^ Combine text with high 
columns. Works with spelling checker. Works feature. 63 columns x cations, or design yourown. resolution graphics. Music 
EasySpell 64. with EasyScript 64. 254 rows. Text, formulas, graphics. and game sounds. 


_ EASY EASY 
FINANCE ІП FINANCE IV 


C commodore С commodore (а= commodore 

Easy Finance I— Easy Finance II— Easy Finance 111— Easy Finance IV— Easy Finance V— 
Loan Analysis Basic Investment Advanced Business Statistics and 
12 loan functions. Bar Analysis Investment Management Forecasting 
graph forecasting as well 16 stock investment Analysis 21 business management Assess present/future 
as calculation. functions. Investment 16 capital investment features. Bar graphs. sales trends with9 , 

bar graph. functions. Bar graphs. Patio and forecasting 

unctions. 


CR commodore G commodore СЕ commodore @ comimoclore 

Accounts Payable/ Accounts M General Ledger Inventory Payroll 
Checkwriting Receivable/Billing 8 general ledger options. Management 24 different payroll 

11 functions. Automatic 11 billing functions. Printed Custom income statement, 1000 inventory items. functions. Integrated with 
billing. 50 vendors/disk. statements. trial balances, reports. Full reports. G/Lsystem. 


C commodore 


COMPUTERS 


First In Quality Software 


Made with love’ Бу; 


<EIROMAG- 


Our доа! iS to preserve classic video дате magazines so that 
they аге по lost permanently: 


People interested in helping out іп апу/сарас гу, 
please visit us at retromags-com: 


No profit is made from these scans, nor do we offer anything 
available from) the publishers themselves: 


Ifyou come across anyone selling releases from 
this site) please donot support them and do let us know: 


Thank you! 


